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COMPUTER CHESS 


A roundup of recent tournaments 


% million people 
made their first 

computer 
purchase 


_ from us. 


We are ComputerLand, the number 
one retailer of small computers In 
the world. 


Why didso many people join the 
ComputerLand team? Because. like 
you, they wanted to buy their first 
computer from a specialist: from 
someone who cared about their 
satisfaction. 


We at ComputerLand carry the widest 
selection of small computer equipment 


available in Australia. 


Adelaide — 1231 PIRIESTREET PHONE 2235083 
Brisbane — 127 CREEK STREET PHONE 2219777 
Melbourne — 555 COLLINS STREET PHONE 625581 
Perth — 197 ST. GEORGES TERRACE PHONE 321 4671 


Sydney — 55 CLARENCE STREET PHONE 293753 


© CLA Sydney July 1980 


Microscomputers, printers, V.D.U-s, 
synthesisers and software, all at price 
you can afford too. 


Our courteous sales and service staff 


can configure a computer system to 
your specifications, and in many Cas¢ 
deliver it to you that same day. 


So, don't limit your options. Come to 
ComputerLand today and join the 
number one team. We're expandinc 
the way your world thinks. 
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Copyright Notice 

All material contained within 
Australian Personal Computer 
is protected by the Common- 
wealth Copyright Act 1968. 

No material may be reproduced 
in part or whole without 
written consent from the copy- 
right holders. 


APC welcomes all unsolicited 
material (written, photographic 
& illustrative) and, although no 
guarantee can be given as to its 
safe return, reasonable care and 
attention will be exercised. 


Guidelines for Contributors 

APC welcomes articles of 
interest. Don’t be put off if 
your style of writing is ““under 
developed” .. . true worth 

lies in the content, and shapin 
features comes naturally to us! 
Manuscripts should not exceed 
3,000 words and authors are 
asked to use triple spaced lines 
with a wide left-hand margin; 
diagrams, listings and/or photo- . 
graphs should be included 
wherever possible. Please enclose 
a stamped, self-addressed 
envelope if you would like your 
article returned. 


Because of the foregoing, it 

is necessary to add that the 
views expressed in articles we 
publish are not necessarily those 
of Australian Personal Computer. 
Overall, however, the magazine 
will try to represent a balanced, 
though independent viewpoint. 
Finally, before submitting an 
article, please check it through 
thoroughly for legibility and 
accuracy. 
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Success in today’s business world 
demands efficiency and financial accuracy. 
But the ever -increasing costand comlexities 
of doing business are forcing you to find 
new ways to cut labour cost as well as gain 
tighter control over your business. 


The ARCHIVES BUSINESS COMPUTER 
can give you the control you need to be 
successful, all in one economical desk-top 
cabinet. 


The ARCHIVES BUSINESS COMPUTER 
can do your daily business functions such 
as accounts receivables and payables, general 
ledger and inventory control. It can keep 
track of stock on hand, stock on order, and 
supplies to be ordered. As a Word Proc- 
essor the ARCHIVES BUSINESS COM.- 
PUTER can do your correspondence, text 
editing of manuals, contracts and proposals. 
The ARCHIVES BUSINESS COMPUTER can 
do virtually any information handling or record 
keeping operation you are presently doing 
plus many desirable operations that cannot 
economically be performed by manual 
methods. | 


The Archives disk storage can reduce 
entire filing cabinets to convenient 514 inch 
disks and instantly retrieve any information 
that you may need when you need it. 


Sound incredible? The ARCHIVES BUS- 
NESS COMPUTER 1s that and more! 


It's a business assistant. One that never 
forgets, never loses reports, makes efficient 
use of its time and is completely trustworthy. 


FEATURES 

Z80 4MHz Processor 

64 K RAM Standard 

744K Bytes Storage (Standard) 
112 Megabytes Storage (Optional) 
12” Green Phosphor Monitor 
25 Lines x 80 Display 

CP/M Operating System 
Selectric Style Keyboard 
$100 Expansion Inbuilt 
Microprocessor Keyboard 
240 x 100 Graphics Format 
Numeric Keypad and Function Keys. 


archives 


The ARCHIVES BUSINESS COMPUTER 
is also easy to work with. So easy in fact, It’s 
no more difficult to operate than any other 
office machine. While the ARCHIVES BUS- 
INESS COMPUTER Its handling the extra 
work load, youcan have more time to develop 
new business tn the field. 


There 1s no question that the major 
area restricting your business growth is In 
the office. This is.one place where employee 
efficiency Is still in the dark ages -requiring 
the handling of paper, forms and files. What 
you really need is not the physical presence 
of obsolete forms and letters, but the 
information and data they contain. You need 
the Archives Business Computer. 


The Archives Business Computer offers 
you an economical way to individualised 
computing power. Youcan take itanywhere 
there’s work to be done. Plug it in, turn it 
on, and it’s working for you giving you 
instant access to the information you need. 


Computerland 


in Melbourne 


the price breakthrough in 
performance business computers. 


Designedespecially for a small business 
or single department ina large corporation, 
the Archives Business Computer is a system 
you can understand and use with a high 
degree of efficiency without being a computer 


" specialist. 


Incorporating quality and reliability the 
Archives Business Computer provides you 
with today’s and tomorrow's best value ina 
computer system. The Archives Business 
Computer is a system to help your business 
grow. 


The Archives Business Computer ts 
backed by competent and qualified technical 
Support for both equipment maintenance 
and software aid as well as continuing 
personalised service. 


One of the best investments you can 
make in this inflationary economy is the 
Archives Business Computer. In fact, virtually 
every business enterprise can benefit in some 
practical way from business computing. 


A full scale demonstration of the Archives 
Business Computer will help you draw positive 
conclusions about how your business can 
improve its cash flow, reduce costs and 
risks, improve customer service, increase 
sales, and improve your employee product- 
Ivity. 


It’s time to make a move for the future. 
It's time to contact Computerland 
Melbourne your Archives dealer. 


SOFTWARE 
Microsoft Fortran 
Microsoft Basic 
Microsoft Cobol 
General Ledger 
Stock Control 
Mail List 

CBasic 2 
Accounts Payable 
Accounts Receivable 
Property Management 
Word Processing System 
Microsoft Basic Compiler 


archives 


555 Collins St. eMelbourne, Vic. eAustralia 3000 Phone 62 5581 e62 6737 eTelex AA37007 


Miriam Cosic and associates present the latest world-wide micro news. 


MilSpec from 
Zilog 


If you’re building your own 
cruise missile in your garage 
but you’re stuck for a suit- 
able CPU with which to con- 
trol it, then cheer up — 
Captain Zilog has come to the 
rescue with military specific- 
ation versions of the Z80 and 
its supporting chippery. Now 
you can develop that intellig- 
ent guidance software in the 
comfort of your living room, 
using your TRS-80 , knowing 
that it will transfer directly 
to the missile’s CPU. And for 
you really advanced con- 
structors, there are also war- 
going versions of the Z8001 
and Z8002 16-bit processors. 

If you haven’t a suitable 
software development system, 
then Zilog can help with that 
too, for it has just knocked 
between 10 and 15% off its 
MCZ-1 microcomputers; 
end-user prices now start at 
under $6000 for the floppy 
disk system and at under 
$18,000 for hard disk 
systems. 


Daneva 
controlled 


Some people might have 
thought Daneva Control’s 
Duoprint II printer just a 
little skinny with only 
twenty columns, even just- 
ified by the skinny price of 
$300. 

Now they are about to 
release the Duoprint III, 
with a more useful 40 
columns, for just a little bit 
more. Rumoured to sell for 
around $350, it will need a 
power supply, cables and a 
casing to live in, as extras. 

One problem for many 
readers is that, as it stands, it’s 
not actually compatible with 
the TRS-80 or some other 
popular computers. So to help 
Ian Davies, our new Technical 
Editor, to find his feet and 
become, like the rest of us, 
totally dedeicated to the 
service of our public, we’re 
twisting his arm to come up 
with a method for plug com- 
patibility. 

So for around $400 ,a 
copy of APC and a bit of 
educated fiddling, you 1l 
have a plain paper, 40 column, 
dot matrix printer. Daneva 
Control is on (03) 598-9207. 


Handy 
handbook 


If you’re interested in micro- 
computers, the Australian 
Microcomputer Handbook is 
a very useful book to have on 
your shelves. 

Its 245 pages are divided 
into two parts. The first goes 
through the fundamentals of 
computer design, peripherals, 


languages and software. There 


are guidelines for selection of 
commercial application 
machines, a section on word 
processors and one on comm- 
unications and networking, 
plus the inevitable “future 
trends’’ chat. The second 
section is an alphabetical 
listing of manufacturers, 
hardware and software, 
pricing and local represent- 
atives — all in considerable 
detail. 

Hopefully you won’t have 
to wait for yours as long as I 
did for mine (just before the 
editor blithely walked in 
with a review copy); but they 
say they ’ve got their act 
together. Computer Refer- 
ence Guide, Suite 204, 284 
Victoria Ave. , Chatswood, 
NSW, 2067; Tel: (02 ) 
411-2576. 


Sensationally 
late 


Speaking of getting acts 


together, Phd finally has their | 


promised range of software 
from Sensational Software 
in the US. Write to P.O. Box 
1007, Brunswick, Vic. 


Three in one 


Dick Smith has a new cassette- 
based software product from 
Microsoft for the System 80 
and the TRS-80. The Editor/ 
Assembler-Plus package, 


-according to the blurb, does 


everything but water your 
potplants and is cheap as well. 
It can assemble programs 
directly into memory, supp- 
orts conditional assembly, 
recognises a whole lot of extra. 
operators, has an automatic © 
program origin facility, can 
support macros and can 
‘quash’ the assembler and 
debug programs so the extra 
space can be used for the edit 
buffer. ‘‘Z-Bug’} (you guessed 
it — the debug program ) can 
be loaded by itself, supports 


up to eight break points, can 
use symbolic references, and 
has a direct calculator mode 
of operating. 

Could one ask for more for 
around $40 from Dick Smith 
Electronics shops everywhere? 


eQuée? 


You may think these trans- 
lation calculators are a joke. 
You wait until some foreigner 
tries to pronounce a simple 
phrase such as ‘‘Do you have 
the right time?’’ from the 
anti-phonetic spelling of the 
English language, as provided 
by his pocket phrase book, 
and you will realise why the 
only firm with a chance in 
this business is Texas Instru- 
ments. 

The Texas translator talks. 
It may sound like a machine 
talking, and it may be mono- 
tonous but when it speaks 
French, it sounds like a mono- 
tonous machine witha French 
accent, a very important 
point. , 

Panasonic has introduced a 
translator which doesn’t talk: 
‘‘Designed for use by the 
travelling businessman. 
tourist, Or student,” says the 
announcement sent to me 
recently, ‘‘it is ideal for vocab- 
ulary practice...’’ I bet. 
“Hello = bonjour,” it says. 

It even detects spelling 
errors. 

The reason for mentioning 
it is that this one can also be 
used as a calculator for simple 
arithmetic, plus a converter 
from imperial miles, feet, 


pounds and pints to metric 


kilometres and so on. So, 


even if the translator turns 
out to be useless, you haven’t 
wasted your money. 


Guy Kewney 


The machine 


that plays 
with itself 


Chessmaster David Levy has 
produced a chess playing 
micro. He claims it’s unique 
in eight ways. 

First, it’s a sophisticated 
game, not just a plug-in 
program for a video ping- 
pong set; it displays the 
chess board and pieces in 
full colour ona TV. 

Second, it includes a 
built-in video cassette 
recorder (not one you can 
record Cop Shop on) to 
record up to 1000 full games 
on ordinary audio cassette 
tape. The player can add his/ 
her own commentary: “‘This 
is where the machine made a 
fatal error,” or ““That error 
the machine made earlier now 
turns out to have been less 
fatal than I originally 
thought.”’ 

_ Third, each game comes 
with a free audio cassette to 
teach you how to operate the 
machine. There are other 
cassettes, including all the 
tournaments and match 
games ever played by Bobby 
Fischer, all Karpov’s games 
(about 800 each) and all 
named opening variations, 


DB yg 


Intelligent Chess, the new chess computer from Optim Games. 
See ‘“‘The Machine That Plays With Itself”’. 
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4 APC 


Choose the name that 


started the revolution 


Right now we are seeking 
new Authorised Dealers to 
Share in our growing success 
in Australia. If you have the 
appropriate background and 
are eager to grasp a golden 
opportunity, talk to our 
executives. 


The Commodore story 


The Commodore PET personal 
computer started a revolution, 
and created a whole new 
industry, on its American release 
in 1977. 

So well designed and capable 
was this microchip marvel that it 
was an immediate phenomenal 
SUCCESS. 

PET, and Commodore, have 
never looked back. 

The range has expanded to 


include fully professional micro- 
computers, every bit as brilliant. 


Commodore PET 2001 — 

your personal computer 
Anyone can work the PET. It’s 

equally at ease monitoring 

medical equipment or production 

lines as it is playing chess or 

Space invaders. 

Commodore CBM 3000 — 

making business a pleasure 


This desk-top microcomputer is 
exceptionally functional, fast and 
cost effective. And, like all the 
Commodore range, it is a fully 
integrated business system — 
which simply means that it’s all 
made to work together — 
no odd bits and pieces! 


Commodore CBM 8000 — 
tomorrow’s computer today 


An expanded version of the 
CBM 3000, this microcomputer 
business system excels in the most 
demanding work situations. 

It’s extremely versatile, highly 
reliable— and backed-up by a 
maintenance service you can 
totally depend upon. 


Cz commodore 
microcomputers 


For more information, write or telephone: 
Commodore Information Centre 
3 Campbell St.,Artarmon N.S.W. 2064 Tel (02) 437 6296 
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about 300. 

Fourth, any square (or 
squares) on the board can _ 
flash. Which may be useful in 
teaching chess, I suppose. 

Fifth, the computer can be 
tortured into revealing 
what its next best move 
would have been, and 
compelled to make that 
move. And the next best, 
and the next, right down to 
the only move left. 

Sixth, the machine can be 
stepped through a pre- 
recorded game, move by 
move. 

Seventh, it can unplay a 
game to the point where you 
want to play something 
cleverer. 

And finally, it can be left 
alone to play games with 
itself, in a shop window or 
at an exhibition. 

It only costs 295 pounds 
in England, but I don’t know 
if anyone’s thinking of 
releasing it here. Chess 
enthusiasts can put their 
phone bills into check by 
calling Optim Games in 
England on (0279 ) 

54547. 


Visicalc etc. 


Visicalc is available for the 
32K Commodore micro with 
disk drive, for around $400, 
from B.S. Microcomp, 561 
Bourke St., Melbourne. 
They’ve also announced a 
Pascal package for the same 
computer. at the same price, 
which is a powerful disk based 
compiler system. 

Visicale is available for the 
32K Tandy from Melbourne | 
House, at 24 Peel St., Colling- 
wood, Vic., and they consider 
it verv exciting news. One 
disk costs $195. Also exciting 
at the same place is the release 
of Galaxy Invasion and Aster- 
oids Nova for the 16K Tandy, 
with sound, for $19.50. 

Visicalc is available for the 
Apple II from Melbourne 
House too. 

Visicale is not available for 
‘the Compucolor, at the Logic 
Shop. But a word processor 
for the Compucolor, at $95, 
is. 

Visicalc, by the way, is an 
accounts package which does 
sales projections, cash flow, 
income tax, costing estimates, 
wages and engineering 
changes. 


Local liner 


There’s a new all-Australian 
high resolution graphics unit, 
the Super 80, available from 
Deforest Software for $439. 
It’s plug compatible to the 
Level Il Modell TRS-80, 
(CPU or interface), is com- 
pletely buffered and contains 
its own power supply. 

If it sells well here, there’s 
talk of a big sales launch in 
the US. APC has checked it 
out elsewhere in this issue. 

And on the subject of 
Deforest, they have also been 
appointed sole Australian 
distributor for the complete 
range of Instant Software 
products. 

Deforest Software is at 
26 Station St., Nunawading, 


Vic.3131.Tel:(03)8776946. 


Cromemco 
Carrier 


Computerland has added the 
Cromemco range of products 
to its stock. It will concentrate 
on supporting the System 
Three Computer, which has 
multi-user capabilities and 
comes with 64K RAM and 
2.4 megabytes of disk storage 
as standard. As well as a range 
of applications and systems 
software for the Cromemco, 
Computerland will be offering 
training sessions for its word 
processing and business 
systems users. Further details 
from Computerland Melb- 
Surtees oe 

555 Collins St., Melb. 

Tel: (03 )62-5581. 


I thought you might like to know some more about 
the unavailable MZ80K mentioned last month. It has 
20K of RAM (only expandable to 48K), of which the 
Basic takes up 14K. A 4K Monitor System in ROM can 


be loaded from cassette. The VDU is a 10 inch black and 
white, with 40 characters by 25 lines. Niceties of the 
system are a fairly fast Basic, built in loud speaker, and 
ex tensive graphics. One of the not so niceties is the use 
of cheap calculator keys of the type Commodore was 
quick to do away with. 


The TRS-80 Model IIT is basically the Model IT ina single 
housing. However, the disks it uses are double density 
and the previously optional RS232 communications 
interface is built in. Extra features of the Model III 
include a real time clock, expanded special character set, 
and 500 or 1500 baud cassette operation. We can expect 
it here about May. And incidentally, the Apple III 
should be here in July. Apparently, Apple is more 
interested in supporting the US market for the 

moment, and wel see the product here when that area 


cools down a bit. 


Software 
comparisons 


Evaluating software pack- 
ages is no easy task — it 
requires plenty of staff or 
lots of time, and there’s 
always the chance that, 
unless you produce your 
report very quickly, the 
package will have been 
altered in some way or 

have become obsolete al- 
together. But the Small 
Systems Group, headed by 
Larry Press and based in 
Santa Monica, has em- 
barked on this onerous task 
and has just announced 

its first report, an evaluation 
of word processing systems. 
The report looks at Auto 
Scribe, Electric Pencil, Magic 
Wand and Wordstar, and costs 
US$12 from SSG at Box 
5429, Santa Monica, CA 
90405. 


Guy Kewney 


TCC up north 


The Computer City Pty Ltd, 
operating under a franchise 
from Computer Country 
of Melbourne, will be opening 
in December at 600 Old 
Cleveland Rd., Camp Hill, 
Qlid.4125.Tel(07 )398 6433. 
It will carry Apple, North 


Star, Commodore, Texas 
Instruments and NEC: and 
will offer full service and 
sales back up. 

TCC is currently negotiat- 
ing a Perth franchise, and is 
still looking around in 
Adelaide and Sydney. 


Chiefly chat 


When I was at the Eighth 
World Computer Exhibition in 
Melbourne. I noticed that the 
microcomputer stands were 
the second most frequented 
area there. The most popular 
place was the bar, but that’s 
understandable. Micros are 
obviously taking off in — 
Australia and those few people 
(mainly connected with the 
big machines) who aren’t 
convinced must have different 
information to Informative 
Systems who now consider it 
worthwhile to have a radio 
advertising campaign. 

Talking of advertising, did 
you realise that Peter 
Hatcher and City Personal 
Computers are one and the 
same? 


P.S. 


Have we all sent in our reader 
surveys? (ANS: ‘‘Yes, ma’am”’ 
or ‘On it’s way, Ma’am’’) 
Have we all expressed a lot of 
interest in ‘““Newsprint’’? 
(ANS: ‘‘Of course, ma’am’’) 
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1. Outlasts every competitor—200,000,000 8. Connects directly to TRS-80™ APPLE® and 


character head warranty ~ other computers 
2. No duty cycle limitations—even in demanding 9. Block graphics —64 shapes for charts, 
business applications | graphs, diagrams 
3. Professional print quality—9 x 7 matrix _ 10. Friction and pin feed 
4. Rugged business use construction—metal 11. Plain paper—up to 3 parts 
chassis—two motors 12. 6 and 8 lines per inch—program controlled 
5. 80 characters per second paper savings 
6. Upper and lower case—full 96 character 13. 80 and 132 columns—program controlled 
ASCII set 14. Price—the best value in the industry. Call or 
7. Double width characters write today for information 


™M 
WHY TRS-80 
W N EF RS | All fourteen are standard with every 
Microline 80. The only options are 
C H OOS F Ty Hi F Snap-on tractors and a buffered (up to 
2000 characters) RS232 interface. 


5 a LO)Gi SHOP PTY.LTD. 


212 HIGH STREET, WINDSOR, VICTORIA, 3181 TELEPHONE: (03) 51 1950 
91 REGENT STREET, CHIPPENDALE, N.S.W., 2008 TELEPHONE: (02) 699 4910, 699 4919 


TRS-80 is a trademark of Tandy Corporation. 


YANKEE DOODLES 


While Australia teeters on the brink of receession, business is booming in Silicon Gulch, 


as Tom Williams reports. 


The boom rolls on. Apple 
Computer has gotten big 
enough to cause something 
of a furore on that citadel 

of American capitalism, 

Wall Street. After Apple 
announced that it was about 
tc launch its first public sale 
of stock, it rapidly became 
one of the hottest offerings 
ever. The company has been 
forced to ration shares to 
various brokers who, in turn, 
are giving only their best 
accounts first crack at buying 
Apple stock. 

Apple is truly a business 
success story and is predicted 
to double its earnings over 
last year’s to a whopping 
$300 million — up from the 
paltry $150 million of a year 
ago. What all this appears to 


mean for the personal compu- 


ter market is that we will be 
seeing even more Apples and 
Apple-related products than 
the veritable flood to which 
we have become accustomed. 
The sale of stock will, for one 
thing, provide good revenue 

| for continued expansion and 
the attention Apple has gain- 
ed in the business world may 
well put it in a position to 
challenge Tandy for the title 
of top dog. There has even 
been a series of radio 
commercials by Dick Cavett 
(not the Dick Cavett, surely ? 
— Ed) promoting Apple 
computers. 

All, however, is not well in 
Apple Land. The long- 
awaited Apple III, which was 
debuted last May at NCC, 
has still not shown up on 
dealers’ shelves. There were 
rumours about soldering pro- 
blems in the power supply 
that forced the company to 
delay volume production for 
a while. 


“All...isnot 
well in 
Apple Land.” 


On the forefront of new 
technology we once more 
find Zilog. After having over- 
come what appears to be 
the last hurdles for the 
Z-8001 (the Z-8000 version 
with segmented addressing 
that accesses eight mega- 
bytes), Zilog is reported to be 
working on a Z-9000. The 
Z-9000 will not have a new 
32-bit architecture but will 
combine the Z-8000 16-bit 
architecture with virtual 
memory support on a single 
chip. 

Virtual memory is a tech- 


nique whereby the CPU 
creates ‘virtual addresses’ for 
all data, which it treats as if 
they were all a part of one 
continuous memory. It then 
sends these virtual addresses 
to amemory management 
unit (MMU) which converts 
them into physical addresses, 
which may exist in RAM or 
on disk. National Semicon- 
ductor had earlier presented 
its 16000 family of 16-bit 
CPUs, one member of which 
combined with an MMU 
chip to support virtual mem- 
ory. If Zilog does come out 
with the Z-9000, it will be 
the first to combine CPU 
and MMU ona single chip. 


The reason for all this acti- 
vity in the area of greater and 
greater memory is the dem- 
and of the market for multi- 
user systems and distributed 
computing. Manufacturers 
are pursuing all approaches, 
but three watchwords are: 
modularity, expandability, 
and compatibility. These are 
sometimes, but not always, 
satisfied by massive amounts 
of RAM under a single CPU. 
At the low end (one to four 
users) which is admirably 
served by such manufactur- 
ers as Altos, a moderate 
amount of RAM supports 
the users and the systems 
offer expandability in the 
direction of disk storage. 

A new entry has just 
joined this area in the shape 
of Morrow Designs’ Decision 
1 System. Morrow has com- 
bined a long experience in 
S100 systems with a range 
of Winchester disk techno- 
logy to produce a line of 
computers that are almost 
continuously expandable 


be 
\U 


from single-user floppy based 
configurations with between 
200k and 2 Mbytes of disk 
storage up to a multi-user 
system with 256k of RAM 
and 28Mb of hard disk, 
priced at just over $14,000. 
The Z80-based Morrow 
system offers memory 
management hardware (not 
to be confused with virtual 
memory above) that has a 
memory map to support up 
to 16 tasks with complete 
memory protection and 
automatic memory alloca- 
tion. In addition, a UNIX- 
like operating system, uNIX, 
and CP/M are offered such 
that the new uNIX can com- 
municate. with CP/M. 
Another new entry which 
showed up at the recent 
Wescon show held in 
Anaheim, California in Sep- 
tember is a rather novel 
machine by Piiceon Corp. 
of San Jose. The Sword 
computer (not to be confu- 
sed with the long defunct 
Japanese Sord) is one of the 
first stand-alone systems to 
use the Intel 8086. The most 
striking thing about the 
Sword-100 is its CRT display, 
which is a 15-inch tube 
mounted ‘on its side’. With 
this arrangement, the 
machine can display up to 
66 lines of 80 characters 
each, a particularly nice 
feature for word processing. 
Memory consists of up to 8 
kbytes of ROM and 64 
kbytes of RAM. Disk storage 


consists of two Qume double- 


sided, double-density drives 
giving a total of 2 Mbytes. 
But — and here is a point 
once again indicative of the 
trend in the industry — it is 


“And she threw everything at me — ineluding the computer 


aimed at the home user!” 


designed to be an intelligent 
terminal workstation which 
can also fit into a distributed 
processing local network. 
These local networks — 
individual processors sharing 
more expensive resources 
such as disks and printers — 
are starting to show up 
everywhere. The Bank of 
America has recently pur- 
chased a Nestar Cluster/One 
with 56 Apples for use as a 
preprocessor for entering 
cheques. The results are of 
course then fed into the 
bank’s IBM behemoth for 
further digestion. According 
to Nestar’s president, Harry 
Saal, the long touted ‘office 
of the future’ is not just 
around the corner — it’s 
already here with a venge- 


“who's using 


those 64k 
RAM chips...” 


ance, and almost without 
anyone noticing. 

Everyone is asking ‘‘who’s 
using those 64k RAM chips 
in a real product?’’ The 
answer is Hewlett-Packard. 
To be sure, the HP-1000 L 
Series is not exactly your 
garden variety personal 
computer but it should not 
take long for the technology 


_ to spread to personal compu- 


ters, especially when the 
results of some of HP’s tests 
become better known, and 
prices come down with 
volume sales. 

HP recently introduced a 
312k RAM board using the 
new 64 kbit chips. During 
reliability tests, technicians 
found the 64k chips to be 
more reliable than conven- 
tional 16 kbit memory 
chips. This obviated the need 
to incorporate costly error- 
correcting circuitry into the 
new memory system. Until 
recently, one of the most 
important problems with 
memories of this density 
was soft errors introduced 
when random alpha particles 
strike memory cells. Newer 
techniques in IC fabrication 
and technology are reducing 
these errors by a factor of 
ten over their previous rate. 
As a result memories should 
continue to become denser, 
and faster with a per- 
bit cost rollback of 20% 
to 30% per year. (I think he 
means they ll get cheaper 
a 

The boom rolls on! 
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Suite 204, 284 Victoria Ave., 
Chatswood, N.S.W. 2067 
AUSTRALIA. 


Tel.: (02) 411 2576 


AUSTRALIAN 


MICROCOMPUTER 


HANDBOOK 


The MICROCOMPUTER HANDBOOK is a unique Australian Publication that reviews the 
large range of microcomputers currently being sold in this country. 


PART | includes a wealth of useful information on 
microcomputer theory. Chapters 1, 2 and 3 
introduce microcomputers, outline the differences 
between microprocessors, microcomputers and 
microcomputer systems, and discuss peripherals 
and software capabilities. Chapter 4 describes 
some of the popular microcomputer Software 
Packages Including the CP/M and MP/M operating 
systems from Digital Research, and various high- 
level languages and utilities from Microsoft, 
Micro Focus, MicroPro, Structured Systems Group 
and others. Various popular application packages 
including word processing are also described. 


Chapter 5 outlines the capabilities found in 
BASIC — the most popular of all microcomputer 
languages. Chapter 6 provides guidelines for 


selecting microcomputers, particularly for those 
people contemplating commercial applications. 
Chapter 7 looks at the capability of micro- 
computers in word processing and is also a 
useful introduction to word processing in general. 
Chapter 8 projects the future potential of micro- 
computers in the coming years, while Chapter 9 
looks at the future trends in microprocessing 
and microcomputing design, as outlined by a 
leading semiconductor manufacturer. 


Chapter 10 discusses the use of microcomputers 
in Communications and networking applications 
and is also a useful introduction to the general 
area of communications and distributed data 
processing. Chapter 11 traces the history of the 
S-100 Bus and outlines the different bus signals 
that have nowadays become fairly standardised. 


PART Il provides a 2 to 6 page summary on the 
range of microcomputer and desktop computers 
sold in Australia including the following: 


@ Al Electronics @ ADE Datasystems @ Alliance 
Digital (ERA) @ Alpha Micro Systems @ Altos e 
Apple @ Cado ® Commodore @ Compucolor e 
Compucorp @ Cromemco @ Data General e 
Datapoint @ Diablo @ Digital Electronics @ Digital 
Equipment @ Durango @ Electronic Control Systems 
@® Exidy @ Fairlight Systems @ Findex @ Hewlett- 
Packard @ IBM @ Intel @ Intelligent Systems Corp. 
@ Intertec @ JonnF Rose @ J.T. Microcomputers @ 
Logical Computer Systems @ Micro V Corp. @ 
Micromation @ Mitsubishi @ Motorola @ National 
Panasonic @ National Semiconductor @ North Star 
@ Ohio Scientific © Omni @ Ontel @ Onyx @ Philips 
@ Small Business Computer Company @ Sord e 
System 80 @ Tandy @ Tektronix @ Texas Instruments 
@ Vector Graphics @ Versatile4 @ Wang @ Zenith 
@® Zilog 3 


| would like to order the Computer Reference Guide MICROCOMPUTER HANDBOOK. 
The cost of the HANDBOOK is $22 (which includes $2 postage). 
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SUPER SO 


Benchtests aside for this issue, as Ian Davies takes a look at a high resolution board for the TRS-890. 


Introduction 


Customtronics’ high resolution board, 
the Super 80, is a memory mapped 
device which generates 384 horizontal 
by 192 vertical dots. It plugs directly 
into the TRS-80 or its expansion inter- 
face to enable the high resolution plus 
full alphanumeric upper/lower case 
facilities. 

As the owners of Apple and Sorcerer 
computers would be quick to boast: 
high resolution improves the effective- 
ness of sales graphs in business. Scientists 
and engineers can use displayed figures, 
schematics and logic diagrams far more 
effectively. Architects can draw detailed 
plans with meaningful three dimens- 
ional views. And, of course, graphics 
in games add a great deal of realism. 


Installation of the Super 80 doesn’t 
require any modification to the TRS-380 
and so shouldn’t effect existing warrant- 
ies. It simply plugs into the edge conn- 
ector of the TRS-80 or its expansion 
interface. No power drain is imposed 
on the TRS-80 as Super 80 contains 
its own power supply plus the required 
protection against voltage spikes for its 
47 ICs. The circuitry appears to have 
been carefully designed with no sign of 
bodges that are to be seen on some 
boards. 

The unit is fitted with a fully buffer- 
ed expansion connection which allows 
other devices to be chained into the 
Tandy edge connector. Super 80 doesn’t 
interfere with any TRS-80 port usage 
and so will not interfere with any prog- 
rams that require ports to have certain 
values. Because it does not prevent 
normal TRS-80 operation, it can be left 
permanently connected to the computer. 
Conversion back to normal resolution 
is a matter of returning the video DIN 
plug from the Super 80 socket to the 
TRS-80 keyboard. 

To the processor the high resolution 
board looks like a 1k chunk of RAM 
at the top end of memory. This is used 
to store 64 programmable characters 
each occupying an area equivalent to a 
normal character. A second 1k of RAM 
in the Super 80 is an exact replica of 
the video RAM of the TRS-80. 

The standard TRS-80 display provides 
16 rows of 64 characters. In graphics 
mode, a character space is divided into 
six pixels (Fig. 1) giving a maximum 
graphics resolution of 128 horizontally 
x 48 vertically. The total number of 
combinations in each six cell graphics 


character is therefore 64 (2°), which are 
designated by Tandy as CHR$(128) to 
CHRS$(191). 


Fig. 1 Normal TRS-80 graphic block 
divided into six pixels. 


Super 80 adds 64 _ user-defined 
graphics characters which divide a 
normal character into 72 pixels (Fig. 2). 
As this allows 227 possible dot com- 
binations (approx. 4.7 x 102?) it is 
impractical to allocate each a predefined 
reference number. Instead, Super 80 
allows 64 programmable graphic char- 
acters which are given values from 
CHR$(192) to CHR§$(255). Don’t 
worry — these values will still perform 
their normal TAB functions if, for 
example, PRINT CHR$(122) is used. 

In a standard TRS-80, POKEing 
CHR$ (192) to CHR$ (255) into video 
RAM will produce the same result as 
the values from 128 to 191. However, 
Super 80 will interpret these values 
according to the preprogrammed con- 
figurations in its first 1k of RAM. 

Except in the case of a 48K TRS- 
80, all RAM locations are unaffected 
by Super 80. Because the 1k of RAM 
used to store the high resolution con- 
figuration is at memory locations 
63488 to 64496, it conflicts with the 
top 1k of a 48k machine. A slide control 
switch is provided to disable Super 80’s 
first 1k, and prevent double addressing 
in such cases. 

As mentioned previously, Super 80 
is not a port driven device. Besides the 
obvious advantage of not tying up 
valuable ports, it means that it will 
generally use less program memory 
in performing tasks associated with high 
resolution graphics. Once the required 
character patterns are defined in mem- 
ory, they can be recalled as often as 
necessary with a simple POKE. For 
example, suppose a small box of charac- 
ter size needs to be drawn on the screen 


Fig. 2 Super 80’s high resolution 
graphic block; same area as the normal 
block but divided into 72 pixels. 


many times during the execution of a 
program. It need be defined only once, 
allocated a character number and then 
POKEd into video RAM as required. 
On the other hand, a port operated unit 
would have to redraw the box each time 
it is required, using additional RAM to 
store the appropriate subroutines. 


Software 


At the moment, there’s a Basic program, 
HIGOS, which must be loaded from 
cassette or disk. It defines the high 
resolution characters and stores them in 
Super 80’s 1k of RAM. Unfortunately, 
HIGOS cannot be used in conjunction 
with user programs so, while redefining 
high resolution characters can be done 
manually, it’s somewhat tedious. But 
then, I wouldn’t have expected defining 
one of 227 combinations to be anything 
ess! 

I’m told it will not be long before 
a machine language version of HIGOS 
becomes available. It will be accessible 
from user Basic programs as well as 
from the command mode. So not only 
won’t you have to dump HIGOS before 
running your own Basic program but 
reproducing characters during program 
execution won’t chew up as much 
processor time. 

The Basic HIGOS plots a magnified 
graphics character on the VDU. Using 
cursor controls, pixels can be filled or 
cleared as required and the character 
given a value of between 192 and 255. 
Modification of previously defined char- 
acters is simple: type in its reference 
number and the magnified graphic 
block will reappear. From there it’s just 
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Dot 
POKE 


row 
locations. 


—2042 
—2041 
—2040 
—2039 
—2038 
—2037 
bod 4 8 1632 
Binary weight. 
Fig. 3 
Example of CHR$ (192) defined as a 
box (shaded area is_ illuminated). 


as if you were defining the character 
for the first time. If HIGOS is cleared 
from memory, the characters will re- 
main in Super 80’s memory until cleared 
or power is switched off. 

To illustrate the procedure for 
programming a character manually, 
assume that CHR$ (192) has been 
chosen to represent a small box. Each 
dot row of CHR$ (192) is given its 
own memory location which can be 
POKEd or PEEKed. Each dot column 
of a character is allocated a value 
(called a binary weight). Figure 3 gives 
details of the box programming. 


Defining CHR$ (192) as a box 
requires the following commands: 
POKE -—2048, 63, POKE —2047 to 
—2038 with 33 and POKE —2037, 63. 
Dot row 1 needed every dot position 
turned on and so a value of 1+2+4+ 
8+16+382 = 68 was POKEd into that 
position. The sides of the box needed 
only the 1 and the 32 columns turned 
on and so POKE byte position, 33 was 
used. 

Features against Super 80 are that 
it interferes with the Level II commands 
POINT, SET and RESET as the inter- 


preter has some difficulty deciphering 
the contents of a character block in 
video memory with a value of 195. 
Also some machine language programs 
(e.g. Sargon IT) POKE values of between 
192 and 255 expecting normal TRS-80 
graphics characters. Instead this results 
in the incorrect high resolution char- 
acters. 

Conclusions 

It’s interesting to see the TRS-80’s 
limitations being overcome by an ever 
increasing number of peripherals, add- 
ons and modifications. And it’s nice to 
see one of the most practical of these 
coming out of Australia. 

Lower case with descenders, Chinese 
letters and electronic and _ scientific 
symbols are now all possible on the 
TRS-80 with a resolution that compares 
favourably with Apples’ 280 by 192 and 
Sorcerer’s 512 by 240. 

Against the Super 80 are the loss of 
some Basic statements and a very slight 
decrease in program execution speed. 
Plus features are TRS-80 plug compatib- 
lity; no need for hardware modificat- 
ions; a price of $43 9; and that it’s made 
in Australia. 


NEW FROM COMMODORE 


DAM 

Now your computer can sense 
the real world with sixteen 8-bit 
Analog Inputs with our DAM 
(Data Aquisition Module). Meas- 
ure Temperature, Light, Pressure, 
Distance, Db, etc. etc., — it’s an 
experimenter’s delight, while being 
a useful tool for computer control 
and measurement. Complete Set 
for PET (including power supply 
and interface modules) $449.00 
including tax. Interfaces for other 
computers are available by order. 


PET 2001 
14K ROM, 8K RAM (RAM ex- 
pandable to 40K) PET now comes 
with the same logic board as our 
professional 3000 series, including 
NEW ROM to allow use of disk 
drives, printers, etc. without need 
for any ‘expansion’ kits. 


PET SPECIAL PACKAGE  —~—s__s tte... ; 
Cur Special gives you a PET 
(large or small keyboard), 
external cassette drive and 
several other goodies all at 
a low price. Give us a call 
for details. 


VISICALC — THE IDEAL PLANNER’S TOOL 


Pentre 660 ee oe $15.00 Space. Shute os. $14.00 Aircraft Lander........ $45.00 
bane oS oe eS, $15.00 Personality Test... .. 2. $14.00 6502 Assembler Tutorial. . . $77.00 
Bomber fe 5 a $15.00 DIANhOSBG. i ee ee $22.00 Talking Calculator ...... $31.00 
Brands Hatch 23. 3 ics, $19.00 Micro Pools Pack ....... $61.00 Course Handler... 7... $260.00 


WRITE FOR OUR SOFTWARE & ACCESSORIES LISTS FOR YOUR PET: PRICES INCLUDE DELIVERY 
DIBLE LECTRONICS 


90 PARK STREET, ABBOTSFORD, VIC. 3067 PH. (03) 41 5708 


Now get OHIO SUPERBOARD II 
Computer with quick delivery 


5 bankcard 


welcome here 


Ohio Scientific Superboard II 

The first complete computer system on a board. Includes 

keyboard, video interface and audio cassette interface. 

e BASIC-ir -ROM; 4K RAM. Requires power supply +5V at 3 
Mp 


“We heartily recommend Superboard II for the beginner 
who wants to get into microcomputers with a minimum 
cost. A real computer with full expandability.” 

POPULAR ELECTRONICS, MARCH, 1979 


“The Superboard Il is an excellent choice for the per- 
sonal computer enthusiast on a budget.” 


BYTE, MAY, 1979 * Plus $42 sales tax 


ONLY $320 ° 


, We have moved. Our new address is: 
COMPUTERWARE, 
305 LATROBE STREET, 
MELBOURNE, 3000. 
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TRENDCOM PRINTERS 


with interfaces to TRS-8O, APPLE, PET, SORCERER 
SUPERBOARD Il, MOTOROLA, SORD etc. 


TRENDCOM 100 
TRENDCOM 200 


9395.00 + $48.00 tax 
9985.00 + $75.00 tax 


Both printers have graphics capability. 


602 1006 


Illustration by Stuart Briers 


Suaue JOURS 


BARE BONES 


OF ROBOTICS 


yesseevetzcers 


How to assemble... 


Outline —NOT along the dotted 
lines. 


Bele: SS 
TL 


2 Cut out slots A, B, C, D, and hole X. 


0 ea A aE 
Ss 
Bene eae 

eae 2Hke Sas 


3 Score and fold back along the black 
dotted lines. Fold ears ere 


the hole as you fold 


etter 
Sie ae Chay ae 


One of the most fascinating projects for the hobbyist is a eB ipier: 
controlled robot. Leslie Solomon, technical director of 
the US magazine Popular Electronics, passes on some tips and ideas. 


I'll begin by telling you the story of the 
guy who went into the pizza parlour 
and ordered a large pizza. The man 
behind the counter asked him whether 
he should cut the pizza into six or eight 
slices. The customer said, “Cut it into 
six slices because I can’t eat eight!” 

The same is true of creating a robot 
— we have two large pieces, large 
enough so that we couldn’t ‘eat’ them 
both. One half is the mechanics of 
robotics while the other half is 


computer. It’s difficult enough to build 


1 Cut out the head and tabs. Cut round the 


5 Fold tab D over tab C, 
passing tab X through 


(fig. 2), tucking in the edges marked ‘‘fold 
under’’ (see fig. 3) to complete. 


4 Fold tab A over tab B 
and pass X through 
the slots as in 
fig. 1. 


complex mechanics, rather than 
simultaneously having to sweat out a 
computer and its software. 

There are two steps in creating a 
computerized robot: first it should be 
mechanically constructed and _ tested 
before installing the computer, then it 
should be mated with the computer, 
after the computer and its software 
have been tested. 

Building the physical elements of a 
machine is just as difficult as con- 
structing the computer interfaces and 


writing the software. The question is 
like asking which came first — the 
chicken or the egg? Do we build the 
robot then the computer, or vice versa? 
Or do we build both together, and what 
do we do if the damn thing doesn’t 
work? How do we decide where the 
problem is? I determined that we 
needed a_ separate electronic and 
mechanical approach and this is what 
we did. 

Since we should be able to test the 
various physical elements of the robot 
as construction goes along, what’s 
needed is a simple, low-cost, yet 
effective means to perform the tests, 
that also will emulate the future 
computer. In a real sense, we should 
first create our mechanical man 
analogue and have full control over 
it before we install the ‘intelligence’. 
Let’s first take a look at a simple remote 
control. 

The most common and usually the 
first thing that comes to mind is radio 
control, using the same systems as 
model planes -- provided you have 
enough channels. However, this involves 
RF transmissions, the need for a licence, 
and a possible visit from government- 
type people who usually have no sense 
ot humour. There are a couple of other 
ways that don’t involve RF and the 
need for a licence, and they remove the 
probability of external noise or signals | 
causing unwanted problems. 

The first approach is called Induction 
Transmission andcan be built by 
anyone. Unless two experimenters work 
in the same building, there will be no 
cross interference, and you can have 
quite a number of signalling channels 
going at the same time. 

The technique is simple. All you have 
to do is wind a turn or two of con- 
ventional insulated wire around the area 
where the robot experiments are to take 
place. In my case, I wound my turns 
along the junction of the walls and 
ceiling of my workshop. It makes no 
difference how small or large the area 
is as long as the total resistance of the 
wire is not excessive; you can wind the 
turn around an acre if you so desire. 
This turn forms the primary of what 
will wind up as a_ strangelooking 
transformer. 

This turn of wire is connected to the 
output of a _ conventional audio 
amplifier — the power requirement 
depends on how large the loop is, but 
a 5 or 10 watt amplifier will usually 
suffice. The turn then simulates the 
speaker load. The secondary of the 
transformer is formed by using a lot 
of turns a few inches in diameter, 
with this coil connected to a small 
transistorized battery powered audio 
amplifier. 

To test the basic system, feed a con- 
ventional music source to the loop 
amplifier and connect an earphone or 
even a speaker to the portable amplifier 
of the secondary. As long as you keep 
the portable secondary within the large 
primary turn and orient the secondary 
so that it is parallel with the primary, 
you should hear the music. ‘I'he 
magnetic field is strongest within the 
turn, but it also extends outwards a 
little; if the turn is on an upper floor 
the music will be heard one or more 
floors above ane S=:~-~ 

Some of you will probably realise 
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that this magnetic induction technique 
can be used to listen to a silent radio 
(a boon for those of you that have 
teenage children who play their 
music at deafening volumes), or 
can even be used as a hearing aid for 
those who need it, without’ the 
constraints of having any _ inter- 
connecting wires. 

Now, suppose you build an array of 
audio tone generators, each operating 
at a different audio frequency and 
whose outputs can be connected to the 
input of the loop power amplifier. Each 
generator has a pushbutton switch 
that turns its associated tone on and off. 

At the receiver there’s a companion 
array of tone decoders following the 
audio amplifier — the 567 PLL is a good 
choice. The output of each tone 
decoder operates a simple transistor 
switch that opens or closes a relay. A 
look at the 567 specs will show several 
circuits that can be used. 

Each relay controls the supply power 
to a_ particular motor; as_ each 
originating pushbutton switch is 
operated, the associated remote relay 
operates. Latching flip-flops can be 
arranged to maintain a tone for some 
period if desired. 

That then is a simple yet powerful 
remote control system which can be 
used anywhere without causing any 
electronic problems. In fact, using this 
technique, it’s possible to build and 
operate a complex robot without having 
a computer. 

Now to the robot. Since it’s always 
best to start at the beginning, the first 
consideration should be total robot 
movement. This usually requires consid- 
eration of how to obtain forward, back- 
ward, right/left rotation, sideways 
motion (if desired), and any other direc- 
tion you see fit. Then you have to con- 
sider the degrees of freedom for each 
limb — these are the joints. You can 
have hinge, rotation and telescope and 
combustions of the above. 

Two very important items we 
discovered at great cost — be sure to 
install limit stops on all mechanical 
motion and don’t make the arms too 
long! It’s amazing how much damage 
can come when cables and PC boards 
get ripped out by excessive rotational 
zeal, and how easily things get bent out 
cf shape by heavy robots falling on 
them. 

You, the builder, have ta consider 
whether to use driven wheels, tracks or 
make articulated legs. Keep in mind that 
wheels and slender narrow tracks are 
are good only in a billiard table type of 
environment — rough or soft surfaces 
may cause the machine to hang up, 
water can cause shorts, and mud is 
death. 

After deciding on the means of 
motive power, it’s best to start with the 
baseplate that mounts the drive motors, 
their battery, and the remote control 
receiver with one (or more) channel 
relays controlling motor power. Add 
‘sufficient weight to the baseplate to 
simulate the estimated final weight of 
the robot. 

Using the master pushbutton 
switches on the tone system, you can 
now test the mechanism. Drive the 


baseplate around the area and 
thoroughly check its operation as to 
turns, forward and backward 
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operation, and stopping. The latter is 
very important! 

By using the loop technique, you can 
now construct any types of limbs or 
other mechanical items and test them 
merely by connecting them to the 
receiver tone decoders. The testing does 
not have to take place on the robot 
itself. The cost of the small 
receivers is so low (just a loop, an OP 
amp and a tone decoder) that you can 
build a few of them, each with only one 
or two tone decoders, just for the 
‘element you are testing. At one time 
we were playing with three different 
items at the same time while our robot 
baseplate was ‘taking a walk’ around our 
workshop using a computer program 
which in turn operated our computer to 
turn on the various tones. 

It'll be useful at this point to make 
another small diversion. 

If you consider a robot having a 
planned weight of 100 lbs and designed 
to travel at about 20 mph, or to carry a 
300 Ib load at 5 mph, you’ll need about 
0/2 HP, or some 5kW of power, or over 
300 amps from a conventional 12 volt 
battery. If you use four 17 lb car 
batteries, and add the weight of the 
motors, mechanics, etc, you will have 
reached 100 Ibs: If you cut the top 
speed to 10 mph, and the top weight to 
200 Ibs (100 machine + 100 load), you 
can cut down to two batteries. So you 
had better sharpen up your pencil, 
break out the old physics book, and do 
a lot of paper work before construction. 

Give some _ thoughts to the 
installation of a small solid-state TV 
camera so you can ‘see’ what the robot 
is up to. 

Now for the computer. Essentially, 
all the computer has to do is turn on 
(and Off) a simple transistor relay driver 
that now substitutes for the loop-driven 
relays. Since most computers have 8 
data bits, you now have the means to 
turn on 256 different relays. It’s not 
difficult to create a logic tree, so arran- 
ged as to turn on any selected relay with 
one particular set of bits; 256 discrete 
functions are probably enough to run 
even a complex robot. 

Software can either be written for 
the computer, or you can start with 
something like Dr Li Chen Wang’s 
‘Robot’ language as published in volume 


2, issue 8 (number 18) of Dr Dobbs 


Journal, or John Webster’s Robot 
Simulation On Microcomputers that 
appeared in the April 1978 issue of 
Byte magazine. 

We used Li Chen’s program with a 
little modification because like the 
computer-emulating tone loop _ just 
described, you don’t need a robot to use 
this software. The cursor on the video 
display substitutes for the actual robot 
and you can use the software to guide 
the cursor through its paces. The 
software enables the cursor to walk 
around obstacles. In real life, the signals 
driving the video cursor can be used to 
drive the robot. 

So, now you are in an interesting 
position since it’s possible to build and 
operate a robot without a computer, 
and you can design and test software 
without a robot. After all is cleaned up, 
you can combine the two. 

Then there is the question of what 
the computer should do in the robot. 
Unfortunately, it’s been found that 


when you consider all the things that 
you would like the robot to do, you run 
out of computer -- unless you install a 
disk system. With one thing leading to 
another, you suddenly realize that your 
computer will start to look like a tank 
and require submarine batteries. 

There’s no right answer as to what 
the robot computer should do; different 
people have different ideas. My answer 
was simple: why not have the robot 


computer do only internal ‘house- 
keeping’ — watching over battery 
level, robot mechanical component 


positioning, contact sensing, and other 
internal tasks. But what about the rest? 

I thought that since my main 
computer had 56k of RAM, a dual 
8 inch disk system, a light pen, an 
excellent video display and loads of 
software (in which I had Li Chen’s 
language running), why not use it to 
control the robot by treating it (the 
robot) as a ie hesreee (19 kbaud) serial 
port? Using the light pen, we could 
sketch the area in which we wanted the 
robot to do things, include obstacles 
such as chairs, tables, walls, etc, and 
have the cursor wander along its course, 
avoiding the obstacles and behaving 
as if it had sense. 

We even considered installing a small 
CB transceiver in the robot, so it could 
communicate with anyone it met during 
its travels. Of course, the computer 
operator, having the other transceiver, 
would perform this miracle. 

We found that although the tone 
link worked fine, what we needed was 
a really high-speed link that wasn’t 
bandwidth limited like the audio 
system. It was about this time that I saw 
a German audio system —built by Sen- 
heiser — that uses a bank of infra-red 
LEDs to talk to an infra-red detector 
mounted in a set of headphones. The 
audio reception was great and I decided 
to try this technique. | 

To experiment with this optical 
data link we built a pair of high-speed 
ultraviolet transmitters using a few 
UV LEDs in parallel, arranged so that 
their optical polar diagrams overlapped 
to produce a broad fan-like beam that 
would cover a wide area. One was used 
as the computer receiver and the other 
as the robot receiver and a conventional 
serial interface was installed on the 
robot computer. Thus, our robot 
now be passed back and forth between 
the host computer and the computer 
resident in the robot. At 19 kbaud we 
found that lots of data could be passed 
back and forth. . 

Of course, using this technique some- 
what limited the range the robot ceuld 
traverse even though we found out 
that the UV link could go around 
reasonable corners. The built-in TV 
camera, having its own RF link back to 
our T'V receiver, enabled us to see what 
the robot was up to in its wanderings. 

This approach may violate your 
concepts of what a robot is and how it 
should be controlled. But the robot,, 
the induction loop and the optical 
system worked fine and we had a lot of 
fun. We’ve learned a lot — both from a 
mechanical and electronic viewpoint -~ 
and I guess that’s what this computer 
stuff is all about. 


COMMUNICATION 


More, please 


Let me first congratulate 
you for your fine magazine; 
I confirm this opinion by 
enclosing my subscription 
form. 

I have one gripe though. 
Town an Apple and appreciate 
the programs published so 
far for this machine, but 
would enjoy more. I realise 
the difficulty in presenting 
a diverse range of software 
especially in relation to (I 
suppose), your committment 
to the more popular machines 
such as the TRS-80, but feel a 
specialist page for at least the 
TRS-80, Apple and PET might 
take the burden off the 
“Programs” Section. 

B. Phillips, Vic. 


We’ve beaten you to it! 
Well, at least a start has been 
made with the ‘APC-80’ for 
Tandy users. And the growing 
number of Sinclair ZX80 
owners can look forward to a 
regular page of their own 
beginning next month. 


We re currently thinking 
about a similar page for 
Apple users while a general 
TRS-80/System 80 column 
is firmly on the drawing 
boards (contributions to 
lan Davies, Technical Editor, 


please). 7 
| M THE 


Miz 


m1 h5 8 OMPUTER 
NWUSE Pt’ io. 


19 William Street, Alexandria, 
NSW 2015. Phone (02) 699-4334. 


JUST PLUG IN 
ees AND COMPUTE! 


$999 complete 


Naturally such specialist 
columns rely a good deal 
on reader contributions so 
we ll be on the lookout for 
interested parties to partic- 
ipate. 

All this doesn’t mean 
‘Programs’ will bite the 
dust. When the big boys 
move over, it'll be free to 
present a much broader 
range of software than 
before. So keep your 
contributions coming and 
we Il point them to the 
appropriate column — Ed. 


16-bit 
efficiency 


Guy Kewney repeats a red 
herring about 16 -bit proces- 
sors. They do not need twice 
the memory size of that used 
by the eight-bit kind. In fact 
averaged over real programs 
they are likely to use less 
memory to complete a given 
task as each instruction is 
more efficient. The Z8000 
uses only two bytes for those 
instructions likely to be used 
most. Typical eight-bit pro- 
grams use around 1.8 bytes 
per instruction and more of 
them. 

The S100 bus uses a mem- 
ory technique that permits 


PERSONAL 
COMPUTER 


USER 8K 

USER RAM 

CASSETTE 
MONITOR 


both 8 and 16 processors 

to use the same memory in a 
multiple processor system. 
The method could easily 
include 32 bit processors and 
SO permit the same system to 
run programs written for all 
popular processors. The E78 
bus has a similar facility. 


R. Silson, N.S.W. 


Cutitout 


My employer has recently 
taken delivery of an Apple 
II with two floppy 
disk subsystems. Since the 
manuals state that only one 
side of the disks can be used 
I was surprised to find that 
a disk containing demonstra- 
tion programs for the Super- 
talkers peripheral had data 
recorded on both sides. There 
were no problems in reaching 
this data. 

On trying to write data 
to the “‘back’’ of an Apple 
disk I got a message indica- 
ting that the disk was write- 
protected. This was because 
the write-protected cutout 
is on the wrong side and an 
examination of the Super- 
talker disk showed that it had 
cutouts on both edges of the 
disk casing. I carefully cut 
another write permit cutout 
opposite the one already on 
a BASF floppy and found 
that I could use the second 


side without any trouble. 

It seems ridiculous to me 
that one side of a floppy 
should be rendered useless 
simply through the lack of a 
hole punched in the disk case. 
D. Watson, N.S.W. 


We definitely do not advise 
readers to follow Mr. Watson’s 
example. Manufacturers test 
both sides of each disk; if 
one Side is faulty then it’s 
sold as a single-sided disk, 
using only the good side; so 
any data recorded on the 
reverse side of a single-sided 
disk could be corrupted. Now 
it’s possible that, to satisfy 
the demand for single-sided 
disks, some are sold which are 
fault-free on both sides, 
however you can’t take 
advantage of this because 
inside the disk’s protective 
envelope there’s a wiper 
which collects any dust or 
dirt from the disk’s surface 

as it revolves; inserting the 
disk the other way round to 
use the reverse side will, by 
reversing the disk’s rotation, 
spread the collected dirt 

over the good side — and 
then you’ve really got 
problems! For the same 
reason, you shouldn’t try 
using a proper double-sided 
disk in a drive designed for 
single-sided disks. — Ed. 


Call in and see our 


Microcomputer House 
® Specialised custom software for all your 


@ Sound units 


for 6502 


Sole NSW agents for 
DATASOFT 


@ Business programmes covering a wide 
variety of standard business applications 
— accounts, estate agent pack, hotel 

portfolio 
Wordpro II and III 

e Games and simulations — fast moving, 
quick thinking, exciting. See our extensive 


database, 


range. 


TEACH YOUR PET NEW TRICKS 


Select your software and try now. 


business applications 
@ Software development 
e Conversion from 16K to 32K 


@ Exciting range of executive furniture for 
microcomputers from $285.00 
e Extensive range of technical publications 


@ All microcomputer supplies 


management, 


Unique in concept—the home computer that grows as you do! 


special features include 

* FULL SIZED 
KEYBOARD 

* ASSEMBLER 
AND BASIC 

* TOP QUALITY 
MOULDED CASE 

* HIGH 

RESOLUTION 

COLOUR 

GRAPHICS* 


* optional 


The Acorn Atom is a definitive personal 
computer, simple to operate. A powerful, full 
facility computer with all the features you 
would expect. 


Just connect the assembled computer to any 
domestic TV and power source and you are 
ready to begin. (Power requirement: 

8V at 800mA). a 

There is an ATOM 
power unit available 
— see the coupon 
below. 


FREE MANUAL ~ 


Free with every ATOM, is acomputer manual. 
The first section explains and teaches you 
BASIC, the language that most personal 
computers and the ATOM operate in. 

The instructions are simple and learning 
quickly becomes a pleasure. You'll soon be 
writing you own programs. The second 
section is a reference manual giving a full 


description of the ATOM’s facilities and how 
to use them. Both sections are fully illustrated 
with example programs. 


The standard ATOM includes: 


HARDWARE 

* Full-sized QWERTY keyboard * 6502 
Microprocessor % Rugged injection-moulded 
case % 4K RAM *% 8K HYPER-ROM 

* Audio cassette interface * VHF TV output * 


SOFTWARE 

* 32-bit arithmetic (+ 2,000,000,000) 

* High speed execution * 43 standard/ 
extended BASIC commands * Variable length 
Strings (up to 256 characters) * String 
manipulation functions * 27 x 32 bit integer 
variables * 27 additional arrays 

* Random number function * PUT and GET 
byte * WAIT command for timing * 

* DO-UNTIL construction * Logical 
operators (AND, OR, EX-OR) * Link to 
machine — code routines * PLOT 
commands, DRAW and MOVE * 


Atom 
*180 


incl. Sales Tax, Packaging and Postage 


HOBBY! OFFICE! 
EDUCATIONAL! 


INCLUDES 


FREE @ Inthe Home 
3 PAGE 
. ate MANUAL < @ [nthe School 


@ Inthe Business 


HH: 
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The ATOM has been designed to grow 

with you. 

As you build confidence and knowledge 

you can add more components. For instance 
the next stage might be to increase the 

ROM and RAM on the basic ATOM from 

8K + 4K to 12K + 12K respectively. 

The 12K + 12K ATOM will give you a direct 
printer drive, floating point mathematics, _ 
scientific and trigonometric functions, high 
resolution graphics. 

From there you can expand indefinitely. 
Acorn have produced an enormous range of 
compatible PCB’s which can be added to your 
Original computer. For instance: 


* A module to give red, green and blue colour 
signals * Teletext VDU card (for prestel and 
Ceefax information) * An in-board connector 
for a communications loop interface — any 
number of ATOMs may be linked to each other 
— or to a master system with mass storage/ 
hard copy facility %* Floppy disk controller 
card. For details write to the address below. 


Your ACORN ATOM may qualify as a business expense. To order complete the coupon below and post. Sinclair Equipment and Acorn Computers are a division of 
Consolidated Marketing (Imports) Pty. Ltd. All components are guaranteed with full service/repair facility available. 
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g ‘lease send me the following items: 


PRINTER DRIVER 


r 


| [ATOM ASSEMBLED—8KROM+4KRAM(MIN) | $780 | | 
|__| ATOMASSEMBLED—12KROM+12KRAM(MAX)| $1380 | 
eee As, 2: See eee ee regen Sa es 
|__| 4K FLOATING POINT ROM (inc. in 12K Version) | $116 | | 

OSDIR eh ae 
| | (inc. in 12K version) [ LS244Butfer =| 9 
|__| MAINS POWER SUPPLY (1.3amps) | $30 
AES. SNS PENTERNAL BOS PASE S| 
RE Se eo ey 


ORDER FORM: 


Item price inc. TOTALS 
Sales Tax 


Name 


Address 


SINCLAIR EQUIPMENT (AUSTRALASIA) PTY. LTD. 
Show room: 308 High Street, Kew 3101, Victoria. Telephone: 861 6224. 


| enclose cheque/Bankcard/Diners Club/Amex 


LPET ETT Try 


Postcode 


CMC6 


NEWCOMERS-START HERE 


What follows is a brief guide for the microcomputing novice. It has been designed for quick reference 
= with all the key words in bold type; of course if you’re feeling adventurous, you're welcome 
to read it right through. Whichever way, we trust you will find it helpful. Happy Microcomputing! 


Welcome to the confusing 
world of the microcomputer. 
First of all, don’t be fooled; 
there’s nothing complicated 
about this business, it’s just 
that we’re surrounded by an 
immense amount of necessary 
jargon. Imagine if we had to 
continually say “numbering 
system with a radix of sixteen 
in which the letters A to F 
represent the values 10 to 
15” when instead we can 
simply say ‘‘hex’’. No doubt 
soon many of the words and 
phrases we are about to 
explain will eventually fall 
into common English usage. 
Until that time, APC will be 
publishing this guide — every 
month. 

We'll start by considering a 
microcomputer’s functions 
and then examine the 
physical components neces- 
sary to implement these 
functions. 

The microcomputer is cap- 
able of receiving information, 
processing it, storing the 
results or sending them some- 
where else. All this informa- 
tion is called data and it 
comprises numbers, letters 
and special symbols which 
can be read by humans. 
Although the data are (yes, 
it’s plural) accepted and out- 
put by the computer in 
‘human’ form, inside it’s a 
different story — they must be 
held in the form of an 
electronic code. This code 
is called binary — a system of 
numbering which uses only Os 
and 1s. Thus in most micros 
each character, number or 
symbol is represented by 
eight binary digits or bits as 
they are called, ranging from 
00000000 to 11111111. 

To simplify communica- 
tion between computers, 
several standard coding sys- 
tems exist, the most common 
being ASCII (American Stan- 
dard Code for Information 
Interchange). As an example 
of this standard, the number 
five is represented as 
00110101 — complicated for 
humans, but easy for the 
computer! This collection of 
eight bits is called a byte and 
computer freaks who spend a 
lot of time messing around 
with bits and bytes use a half- 
way human representation 
called hex. The hex equiva- 
lent of a byte is obtained by 
giving each half a single 
character code (O—9,A—F): 
0=0000, 1=0001, 2=0010, 
3=0011, 4=0100, 5=0101 
Lo =1110 and F=1111. 
Our example of 53is therefore 
35 in hex. This makes it 
easier for humans to handle 
complicated collections of Os 
and 1s. The machine detects 
these Os and Is by recognis- 
ing different voltage levels. 

The computer processes 
data by reshuffling, per- 


forming arithmetic on, or 

by comparing them with other 
data. It’s the latter function 
that gives a computer its 
apparent ‘intelligence’ — the 
ability to make decisions and 
to act upon them. It has to 
be given a set of rules in 
order to do this and, once 
again, these rules are stored 
in memory as bytes. The rules 
are called programs and 
while they can be input in 
binary or hex (machine code 
programming), the usual 
method is to have a special 
program which translates 
English or near-English into 
machine code. This speeds 
programming considerably ; 
the nearer the programming 
language is to English, the 
faster the programming time. 
On the other hand, program 
execution speed tends to be 
slower. 

The most common micro- 
computer language is Basic. 
Program instructions are 
typed in at the keyboard, to 
be coded and stored in the 
computer’s memory. To run 
such a program the computer 
uses an interpreter which 
picks up each English-type 
instruction, translates it into 
machine code and then feeds 
it into the processor for 
execution. It has to do this 
each time the same instruc- 
tion has to be executed. 

Two strange words you 
will hear in connection with 
Basic are PEEK and POKE. 
They give the programmer 
access to the memory of 
the machine. It’s possible to 
read (PEEK) the contents of 
a byte in the computer and 
to modify a byte (POKE). 

Moving on to hardware, 
this means the physical com- 
ponents of a computer sys- 
tem as opposed to software — 
the programs needed to make 
the system work. 

At the heart of a micro- 
computer system is the 
central processing unit (CPU), 
a single microprocessor chip 
with supporting devices such 
as buffers, which ‘amplify’ 
the CPU’s signals for use by 
other components in the 
system. The packaged chips 
are either soldered directly to 
a printed circuit board (PCB) 
or are mounted in sockets. 

In some microcomputers, 
the entire system is mounted 
on a single, large, PCB; in 
others a bus system is used, 
comprising a long PCB hold- 
ing a number of interconnec- 
ted sockets. Plugged into 
these are several smaller 
PCBs, each with a specific 
function — for instance, one 
card would hold the CPU and 
its support chips. The most 
widely-used bus system is 
called the S100. 

The CPU needs memory 
in which to keep programs 


and data. Microcomputers 
generally have two types of 
memory, RAM (Random 
Access Memory) and ROM 
(Read Only Memory). The 
CPU can read information 
stored in RAM — and also 
put information into RAM. 
Two types of RAM exist — 
static and dynamic; all you 
really need know is that 
dynamic RAM uses less 
power and is less expensive 
than static, but it requires 
additional, complex, circuity 
to make it work. Both types 
of RAM lose their contents 
when power is switched off, 
whereas ROM retains its con- 
tents permanently. Not sur- 
prisingly, manufacturers 
often store interpreters and 
the like in ROM. The CPU 
can only read the ROM’s 
contents and cannot alter 
them in any way. You can 
buy special ROMs called 
PROMs (Programmable 
ROMs) and EPROMs (Erase- 
able PROMs) which can be 
programmed using a special 
device; EPROMs can be 
erased using ultra-violet light. 

Because RAM loses its 
contents when power is 
switched off, cassettes and 
floppy disks are used to save 
programs and data for later 
use. Audio-type tape recor- 
ders are often used by con- 
verting data to a series of 
audio tones and recording 
them; later the computer can 
listen to these same tones and 
re-convert them into data. 
Various methods are used for 
this, so a cassette recorded 
by one make of computer 
won’t necessarily work on 
another make. It takes a long 
time to record and play back 
information and it’s difficult 
to locate one specific item 
among a whole mass of infor- 
mation on a cassette; there- 
fore, to overcome these pro- 
blems, floppy disks are used 
On more sophisticated 
systems. 

A floppy disk is made of 
thin plastic, coated with a 
magnetic recording surface 
rather like that used on tape. 
The disk, in its protective 
envelope, is placed in a disk 
drive which rotates it and 
moves a read/write head 
across the disk’s surface. The 
disk is divided into concen- 
tric rings called tracks, each 
of which is in turn subdivi- 
ded into sectors. Using a pro- 
gram called a disk operating 
system, the computer keeps 
track of exactly where infor- 
mation is on the disk and it 
can get to any item of data 
by moving the head to the 
appropriate track and then 
waiting for the right sector 
to come round. Two methods 
are used to tell the computer 
where on a track each 
sector starts: soft sectoring 


where special signals are re- 
corded on the surface and 
hard sectoring where holes 
are punched through the 
disk around the central hole, 
one per sector. 

Half-way between 
cassettes and disks is the 
stringy floppy — a miniature 
continuous loop tape 
cartridge, faster than a 
cassette but cheaper than a 
disk system. Hard disk systems 
are also available for micro- 
computers; they store more 
information than floppy 
disks, are more reliable and 
information can be transfer- 
red to and from them much 
more quickly. 

You, the user, must be 
able to communicate with the 
computer and the generally 
accepted minimum for this is 
the visual display unit (VDU), 
which looks like a TV screen 
with a typewriter-style key- 
board ; sometimes these are 
built into the system, some- 
times they’re separate. If you 
want a written record (hard 
copy) of the computer’s 
output, you’ll need a printer. 

The computer can send 
out and receive information 
in two forms — parallel and 
serial. Parallel input/output 
(I/O) requires a series of 
wires to connect the compu- 
ter to another device, such as 
a printer, and it sends out 
data a byte at a time, witha 
separate wire carrying each 
bit. Serial I/O involves 
sending data one bit at a time 
along a single piece of wire, 
with extra bits added to tell 
the receiving device when a 
byte is about to start and 
when it has finished. The 
speed that data is transmitted 
is referred to as the baud rate 
and, very roughly, the baud 
rate divided by 10 equals the 
number of bytes being sent 
per second. 

To ensure that both 
receiver and transmitter link 
up without any electrical 
horrors, standards exist for 
serial interfaces; the most 
common is RS232 (or V24) 
while, for parallel interfaces 
to printers, the Centronics 
standard is popular. 

Finally, a modem connects 
a computer, via a serial inter- 
face, to the telephone system 
allowing two computers with 
modems to exchange 
information. A modem must 
be wired into the telephone 
system and you need 
Telecom’s permission; 
instead you could use an 
acoustic coupler, which has 
two obscene-looking rubber 
cups into which the handset 
fits, and which has no elec- 
trical connection with the 
phone system — Telecom 
isn’t so uppity about the use 
of these. 

ALLA ES 


APC 15 


Remember — all prices shown include sales 
tax, postage and packing. 

N.B. Your Sinclair ZX80 may qualify as a 
business expense. 
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ZXSO 


Until now, building your own computer could 
cost you around $600 — and still leave you with 
only a bare board for your trouble. The Sinclair 
ZX80 changes all that. For just $295 you get 
everything you need including leads for direct 
connection to your own cassette recorder and 
television. The ZX80 really is a complete, 
powertul full-facility computer matching or sur- 
passing other personal computers costing much 
more. The ZX80 is programmed in BASIC and 
you could use it for anything from chess to run- 
ning a power station. 

Two unique and valuable components of the 
Sinclair ZX80: the Sinclair BASIC interpreter 
and the Sinclair teach-yourself BASIC manual. 
The unique Sinclair BASIC interpreter: offers 
remarkable programming advantages — unique 
‘one touch key word entry. The ZX80 
eliminates a great deal of tiresome typing, Key 
words (RUN, PRINT, LIST etc) have their own 


VHF TV modulator. 


780-1 microprocessor - new, 
faster version of the famous. 
Z-80 microprocessor chip, 
widely recognised as the best 
ever made. 


RAM chips. 
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single key entry. Unique syntax check. Only. 
lines with correct syntax are accepted into 
programs. A cursor identifies errors immediate- 
ly, preventing entry of long and complicated 
programs with faults only to discover them when 
you run. 

Excellent string handling capability — takes 
up to 26 string variables of any length. All 
strings can undergo all rational tests (e.g. com- 
parison). The ZX80 also has string input to re- 
quest a line of text; strings do not need to be 
dimensioned. Up to 26 single dimension arrays. 
FOR/NEXT loops nested up to 26. Variable 
names of any length. BASIC language also 
handles full Boolean arithmatic, conditional ex- 
pressions, etc. 

Exceptionally powerful edit facilities, allows 
modification of existing program lines. Ran- 
domise function, useful for games and _ secret 
codes. Timer under program control. PEEK and 


Quantity 


| ORDER FORM: 


ORDER FORM: 


Ready-assembled Sinclair ZX80 
Personal Computer(s). 

Price incl. ZX80 BASIC manual, 
excl. mains adaptor. 
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POKE enable entry of machine code instruc- 
tions. USR causes jump to a user's machine 
language sub-routine. High resolution graphics 
with 22 standard graphic symbols. The Sinclair 
teach-vourself-BASIC manual 96 page book free 
with every kit. 

Fewer chips, compact design, volume produc- 
tion means MORE POWER FOR YOUR 
DOLLAR! The ZX80 owes its low price to its 
remarkable design: the whole system is packed 
onto fewer, newer more powerful. and advanced 
LSI chips. A single SUPER ROM, for instance, 
contains the BASIC interpreter, the character 
set, operating system and monitor. And the 
ZX80's IK byte RAM ts roughly equivalent to 
4K bytes ina conventional computer because the 
ZX80's brilliant design packs the RAM so much 
more tightly. (Key words occupy just a single 
byte). You can add to the memory via the expan- 
sion port, giving a maximum potential of 16K. 


Sel 
SINCLAIR FQUIPMENT (AUSTRALASIA) PTY. LTD. 


308 High St.. Kew 3101, Vic. Tel. 861 6224. 


Item Price Total 


$295.00 


Mains Adaptor(s) (600Ma at 9V DC 
nominal unregulated). 


$16.00 


Clock. 


Memory Expansion Board(s) takes 
up to 3K bytes. 


$28.50 


RAM Memory chips — standard=5K 
byles capacity. 


$10.00 


Sinclair ZX8O Manual(s) free with 
every ZX8O computer. 


$15.00 


I enclose cheque/Bankcard/ Diners Club/Amex 


TOTAL 


pee Pee 


Address 


Postcode | 


The latter half of 1980 saw three major computer chess tournaments, two of which were restricted to micros. 
APC's resident chess expert Kevin O’Connell examines the results. 


The first World Microcomputer 
Championship was treated with the full 
respect it deserved, being held under the 
auspices not only of the ICCA (Inter- 
national Computer Chess Association) 
but also under those of FIDE (Federation 
Internationale des Echecs) — the World 
Chess Federation. Held in London, as 
part of the Personal Computer World 
Show (46 September), it was certainly 
a prestigious event, which the 
commercial entries, seeking publicity 
from the World Champion title for their 
program, proved by _ sending top 
executives to oversee the operation of 
their machines. 

There were 14 competitors — there 
could have been more but quite a few 
enquiries arrived too late; a very strong 
American program arrived two days after 
the tournament ended! Originally sent 
in June with a 15 cent stamp, it had 
been returned to sender because of 
insufficient postage, was put back in the 
mail bearing a second 15 cent stamp 
(just one cent short of the airmail tariff) 
and so travelled by sea, no doubt leaving 
the programmer feeling rather sick. 

The first round results would have 
completely justified the seeding had not 
Sargon 2.0 lost on time when it was 
more than a queen ahead on material. 
K. Chess IV also had an unfortunate 
experience — the draw gave it the white 
pieces but it could only play with black! 
K. Chess IV lost that game by default, 
but some hurried modifications enabled 
it to complete the course. 

Round two put a check to the 
aspirations of Mike Johnson, winner of 
the 1978 Personal Computer World 
tournament, and David Broughton, 
winner of last year’s non-commercial 
prize. David Broughton’s Vega went 
down to Sargon 2.0 while Mike 3 .0, the 
only program running on special chess 
hardware, drew by repetition against the 
Modular Game System 2.5 despite being 
a queen up. 

The two programs that had now 
emerged as favourites met in the third 
round. The destiny of the non-commer- 
cial first prize seemed almost sure to go 
to Mike Johnson and Dave Wilson when 
Mike 3 .0 won while Vega lost again. 

In round five, Chess Challenger 
played its most convincing game of the 
Championship, beating the Modular 
Game System 2.5. Since Challenger’s 
other nearest rival at the start of this 
round, Mike 3.0, also lost, Challenger’s 
lead, with just one round to go, extend- 
ed to a full point. 

In the last round attention was 
focused on the games Sargon 2.0 v 
Chess Challenger and Rook 4.0 v Mike 
3.0, with a weather eye cast on develop- 
ments in Boris Experimental’s game. If 
Sargon 2.0 could beat Challenger and 
Boris Experimental could defeat its 
opponent (which it did), there would be 
a tie for first place and the excitement 
of a play-off match. 


The game between Rook and Mike 
would determine the winner for the top 


non-commercial prize. In the event 
these two programs drew and _ there 
could have been a tie for all three non- 
commercial prizes had Vega been able 
to win, but it was having an uphill 
struggle to draw with the Auto 
Response Board 2.5. 

Mike 3.0 and Rook 4.0 shared $1500 
for the top two non-commercial entries, 
the other prize of $200 going to Vega 
1.7. Chess Challenger took the hand- 


Table of results 


PROGRAM (* commercial entry) 


1 CHESS CHALLENGER * (USA) 
(Dan & Kathe Spracklen, Ron 
Nelson, Frank Duason & Ed 
English) 

(6502 - Assembler) 20k 


2 BORIS EXPERIMENTAL* (USA) 
(programmers not named but 
based on Boris 2.5 by Dan& 
Kathe Spracklen) 

(6502 - Assembler) 8k 


MIKE 3.0 (UK) 
Mike Johnson & Dave Wilson 
(6502 & chess hardware - Assembler) 48 k 


ROOK 4.0 (Sweden) 
Lars Kalsson 
(Z8000 - Assembler) 16k 


5 SARGON 2.0* (USA) 
Dan & Kathe Spracklen 
-(6502 - Machine Language) 24k 


6 GAMBIET* (Netherlands) 
Wim Rens 
(Z80 - Assembler) 10k Le 


7 MODULAR GAME SYSTEM 2.5* (USA) W6 D3 W9 Li 


Dan & Kathe Spracklen 
(6502 - Assembler) 8k 


8 AUTO RESPONSE BOARD 2.5* (USA) 
Dan & Kathe Spracklen 
(6502 - Machine Language) 8k 


9 VEGA 17 (OR): =. 
David Broughton 
(Z80 - Assembler) 12k 


10 VIKTOR (Switzerland) 
Herbert Bruderer 
(8085 - Assembler) 8k 


11 ALBATROSS (UK) 
Michael Parker 
(Z80 - Assembler) 18k 


12 FAFNER 2(UK) 
Guy Burkill & Alex Kidson 
(6502 - Pascal & Assembler) 16k 


13 PRINCHESS 1.0 (Sweden) 
Ulf Rathsman 
(6502 - Assembler) 12k 


14 K. CHESS IV (UK) 
Andrew Thomason 
(Z80 - Machine Language) 2.2 k 
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some trophy and the glory of being the 
first program to bear the illustrious title 
of World Microcomputer Chess 
Champion. 

Looking through the final score-table 
it seems almost to be a match tourna- 
ment Dan and Kathe Spracklen against 
the rest of the world, an event they lost 
by the narrowest of margins; the five 
programs written by them (entirely or 
in large part) scored 17 out of the 
total available 35 points. 
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US championships 


No sooner had the dust settled on the 


US results 


; . W2 w4 4 
World Microcomputer Chess Champion- 1 (1) CHAMPION SENSORY W6 W5 
ship at the Personal Computer World CHALLENGER (USA) : 
Show than the results of the first US Ja oe bANG ONE Be viees sy Yad 2 a a pe eee Se 
Microcomputer Chess Championship, 2=(2) BORIS 2.5 (USA) W10 W7 L1 D5 2% 
played. = that: same. =.wéekend, | “came -< <> °™ = Stand alone device, 7c oc ee es 
through. 2=(3) BORIS EXPERIMENTAL (USA) W8 D4 L5 wo WM 
The Norh Amenean tournament. >. ~a Stand-alowedewce a 2 ico Fe ee ee 
was played in San Jose, California, 9-(4) CHESS CHAMPION SUPER wi D3. W8 Li QV, 
and co-sponsored by Personal Com- SYSTEM III (HK) 
puting, the Mychess team, Applied Orne d lone depo 
Concepts and Motorola. Three of the 2=(5) MYCHESS ‘B’ (USA) wo Li Gi ye 
compeuror : were st Dessert : oe Promanis6 
London at the same time — one oO Ce e 
advantages a micro has over a human. 6 (6) ATARI 4k ‘A’ (USA) L1 W10 D7 D8 2 
The results achievyed-by-Potis2.6 ant - 2. <—. EV interface’Onl 2.8 Jee ee a 
Chess Champion Super System III were 7=(7) MYCHESS ‘A’ (USA) L4 L2 D6 W10 1% 
particularly impressive — they have been Cromemco : 
commercially available for more thana 7=(8) SFINKS (USA) L3 W9 L4 D6 1% 
year now. Of course, this is not to TRS-80 
detract from the success of the Sprack- 9 (9) ATARI 4k ‘B’ (USA) LB L8 Wie bee oes 
Rese! new _ DeOgtarn a he | ee PAT at av tac Wl wit 
ard ware. but: it ‘will be ‘interesting to- * -— e e Se ea 
see the new programs expected ibm 10(10) LANE’S TC’86 (USA) L2 L6 L9 L7 0 
Applied Concepts and SciSys. ___ Stand-alone device 


Cromemco In the microcomputer field, the Cromemco System Three and 2-2H Winchester Hard Disc 

1 Ae ae eed ee ee ee ee Be oe ee, Systems stand alone in the range of features and capabilities offered. These systems are based 
Tomorrow's Computers Today on the Z-80A chip, and have from 1-4 mbytes of diskette storage, and from 10-80 mbytes of 

hard disc storage, combined with the widest range of software available in the industry, including 

Multi-user, Multi-tasking operation. 

The computers have a large $100 motherboard and the operating system is a Superset of 
CP/M, thus allowing a wide range of non-cromemco hardware and software to be used. This 
also provides ‘‘obsolescence insurance’. Some of these features include high resolution colour 
graphics, Eprom programmers, remote terminal emulation, and card reader interfaces. 

Cromemco Basic, available in 3K, 16K, and 32K structured/KSAM versions, is fast, efficient, 
and ideal for teaching purposes because of it’s dynamic error trapping on entry, and easy file 
handling. Cromemco Fortran |V and Cobol are equal in power to those found on mainframes, 
and of course, Pasca!, C, and other high levei languages are also available. 

Informative Systems, Cromemco’s authorised centre for sales and service, have installed 
many systems throughout Australia, backed by Cromemco trained technical staff offering 
maintenance, support and user training. 


INFORMATIVE SYSTEMS Pty Ltd Sydney (02) 680 2161 


Specialists in professional microcomputers and high performance computer support products. 


3 Bank Street, South Melbourne, Vic 3205 Telephone (03) 690 2284 Telex 30458 INSYST 


FOR OHIO SCIENTIFIC COMPUTERS etc. 


L | ELE YW VIDEO P.O. Box 347 Richmond 3121 


418 Bridge Rd. Richmond 3121 Victoria. Phone (03) 429-5674. 
“X-MAS SALE” 


Word Processors $39.00 Cursor C2/4 ger eg 
Now % cost price, were $99 — Must Clear”’ Mini Assembler . . . $9.95 
Sound Effects ...$9.95 (supplement to 1.24 
HARDWARE Disassembled ROM, with caeneie a | ous 
Memory Expansion Board 8k 32X64 Character Display .. . $12.95 
“The double-sided plated-through board has 8k of Supplement to 1.12 — 100% hardware method . $4.95 
wired sockets with driver, buffer |.C.’s, and RF Sound Board instructions . . . $7.95 
filters. Add 2114’s as you require. Morse Code Converter & Tape... $16.95 
RAM KIT SPECIAL $79... assembled and tested, RTTY for CIP... $16.95 
extra $15”. Saving Data on Tape... $6.95 
New EPROM with Single Key Basic and Cursor Cannoneers . . . $9.95 
Control .. . $49.95 Avalanche ... $9.95 
RF Modulator 5 to 9 volt, all channels $19.95 Pinball . . . $9.95 


Cover/VDU Stand for Superboard II (Perspex) Nisiegt Sub yAUven tures <2) 219-S5 
... $18.95 Alien || — harder version... $11.95 


Pyramid (Adventure) . .. $18.95 
Superboard I! Computer . . . $395 Othello .. . $9.95 


Challenger 1P Computer Series 2... $595 OSI Basic in ROM... $9.95 


Challenger 4P Computer Series 2 with sound, The First 100 Items — catalogue of software inc. 
and NTSC Color... $1,149 hints, etc... . $3.50 plus $1.00 p&p 
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World computer 
chess championship 


After their own two special tourna- 
ments, the big guns of the micro world 
were trained on Linz in Austria, site of 
the third World Computer Chess Cham- 
pionshi (25-29 September). Four 
‘micros’ were among the 18 contestants. 
Advance 1.0 (UK) and Bebe (USA) were 
under microprocessor control but also 
availed themselves of some special chess 
hardware which, in each case, owed 
much to bit-slice technology. There 
were also two pure micros: Mychess 
(USA), running on a Cromemco, and 
the ubiquitous Champion Sensory Chal- 
lenger (USA), victor of both the US and 
bi World Microcomputer Champion- 
ships. 


Advance 1.0, programmed by Mike 
Johnson and Dave Wilson, played in the 
World Micro Championship under the 
guise of Mike 3.0. In Linz only the 
name (and program!) had been changed. 
By defeating Sweden’s Dark Horse, 
running on a Univac 1100/81 and pro- 
grammed by Ulf Rathsman — whose 
Princhess had competed in the World 
Micro where it had lost to Mike 3.0 — 
this was the only microcomputer to 
at a game. We reproduce that game 

ere: 


WHITE: Advance 1 .0 
BLACK: Dark Horse:1 .0 


1 e2-e4 e7 -ed 

2 Ngl-f3 Nb8 -c6 

3 Bfl-b5 Ng8 -f6 

4 0-0 (Kel-gl) Bf8 -e7 

5 Rfl-el Be7 -d6 ?? 


All beginners know that it is bad to 
move a piece twice in the opening. 
6 d2-d4 Nec6 xd4 
7 Nf3xd4 a7 -a6 
Why not? After all, if White has two 
pieces attacked then Black must be able 
to take one of them, so there is no rush 
to capture on d4. 
8 Bbd-c4 b7 -bd 
White still has two pieces attacked. 
9 Be4-dd5 Nf6 xd5 
10 e4xd5 

Now Black wants, and needs, to take 
the knight on d4. That is what it was 
counting on, but White’s last move 
cleared one more piece from the e-file 
and now edxd4 is illegal. Oh well, back 
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World CCC results 


1. BELLE (USA) 
Ken Thompson; Joe Condon 


PDP 11/70 with chess hardware 


W8& D6 Ww4 3% 


2. CHAOS (USA) 
Fred Swartz; Mike Alexander; 
Jack O’Keefe; Victor Berman 
Amdahl 470 

3. DUCHESS (USA) 
Tom Truscott; Bruce Wright; 
Eric Jensen 
Amdahl V/8 

4. L’EXCENTRIQUE (Can) 
Claude Jarry 
Amdahl V/7 


5. CHESS 4.9 (USA) 
Lawrence Atkin; David Cahlander 


W17 D4 W6 


W18 W12 is see 


W5 D2 


GA D9 Wil W10 2% 


CDC Cyber 176 


6. NUCHESS (USA) 
David Slate; William Blanchard 


CDC Cyber 176 

7. KAISSA (USSR) 
V L Arlazarov; M V Donskoy 
IBM 370/168 


82 = BCP LBKS 
Don Beal 
PDP 11/70 


Wi6 D1 L2 D9 2 


Wi4 . 


9. BEBE (USA) 
Tony Scherzer 
Bebe chess machine 


10. SCHACH 2.3 ee) 
Matthias Engelbach 
Burroughs 7800 

11. AWIT (Can) 

T A Marsland 
Amdahl 470 V/7 

12. MASTER (UK) 

Peter Kent; John Birmingham 
IBM 3033 


D5 
D8 W13 
L5 


L3 D9 


13. OSTRICH (Can) 
Monroe Newborn 
Data General Nova 4 

14. MYCHESS (USA) 
David Kittinger 
Cromemco 


L7 1% 


1% 


15. PARWELL (BRD) 

Thomas Nitsche; Elmar Henne; 
Wolfram Wolff 

Siemens SMS 2 plus 128 


8080s in parallel 


. ADVANCE 1.0 (UK) 
Mike Johnson; Dave Wilson 
6502 plus chess hardware 


L12 1% 


L6 


. DARK HORSE (SWE) 
Ulf Rathsman 
Univae 1100/81 


L2 


. CSC (USA 


L3 


Dan & Kathe Spracklen; Ron Nelson; 


Frank Duason; Ed English 
Champion Sensory Challenger 


Belle defeated Chaos in the play-off for the title 


10. 0-0 — -g8 ) 
11 Nd4-f5 Bc8 -b 
12 Bcl-h6! ene 


Black was lost, but this makes matters 
worse. 
13 Qdl1l-g4+ Black resigned 

The trouble with 13...Qd8-g5 would 
have been that after 14 Nf5 xh6 +, Black 
would be at something of a loss to coun- 
ter the follow-up 15 Qg4xgb. 


The overall performance of the 
micros in Linz was quite good — of 14 
games played against programs running 
on mainframes the micros’ scored 
+1*7 —6 (32%). 


See the score table for the full results 
of the tournament. 
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EXCITING, ENTERTAINING SOFTWARE 
FOR YOUR SORCERER 


If you enjoyed ‘INVADERS’, you'll love GALAXIANS by Martin Sevior. 

Your space ship has encountered an army of Galaxians whose mission is to destroy you. Blast them with 
lazers, but beware, they dive at you with ever increasing fury! Your Sorcerer’s unique high resolution 
graphics add to the arcade-like excitement that this game generates. Program comes on cassette and will 
run on any size Sorcerer. $19.95 


System Software 


1 Kent Street Bicton, Western Australia 6157 Telephone (09) 339 3842 
ae ae a ee cee my os ee ee ee i 


WHERE TO GET IT: 

Write to the above address. We will accept money orders and personal or bank 
cheques. Add $2.00 for handling and airmail postage. 

Dealer enquiries invited. 


Deduced probabilities 


When playing a game of cards you usual- 
ly know which cards you have been 
given, but normally you will not see the 
cards that have been dealt to your oppo- 
nent(s). You may be able to deduce cer- 
tain things about an opponent’s card 
holding from the way in which he bids 
or plays, but it is unlikely that you will 
know exactly what he holds until very 
near the end of the hand. Decisions 
made in this sort of environment must 
be made on a probabilistic basis; in 
other words, you play with the odds 
and hope for the best. If you have cal- 
culated the odds correctly you will win 
more often than you lose. 


Shuffling 


Before proceeding to the main point of 
this month’s article I should perhaps 
interpose a brief section on how to shuf- 
fle the cards in your program. The sim- 
plest way of creating a randomly sor- 
ted deck is as follows. Starting with the 

deck in any order you wish (even per- 


COMPUTER 


VIE. 


fectly sorted), interchange the first card 
in the deck with the Rth card, where R 
is a pseudo-randomly chosen integer on 
the range 1 to n (n is the total number 
of cards in the deck). Then interchange 
the second card with another randomly 
chosen card, then the third, and so on 
to the end of the pack. The manner in 
which you generate your random num- 
bers is of some consequence — I would 
recommend that while developing your 


program you use one of the seeding | 


methods in which the i+1 th random 
number is generated from the i th num- 
ber, and the series is started with a 
“seed”? which may be chosen by the 
user. This approach has the advantage 
that if you spot a bug in your program 
you can recreate the hand simply by 
starting with the same seed. Once your 
program is debugged you may use the 
computer’s internal clock to supply the 
seed, for example by using the time 
elapsed between the pressing of two 
keys. 

One seeded random number generator 
which will suffice is: 


Rj = al x seed (mod m) 


S 


by David Levy 


GUESSING THE ODDS 


where Rj = i th pseudo-random number 


a = 8t + 3 (for any positive integer t) 
m = 20 where b is the number of bits 
per word in your computer. 


Deducing 
information from the 
Play of the Cards 


For the purpose of creating a simple 
example I have invented the following 
card game. The game is played by three 

layers who are each dealt 17 cards at 
the start of a hand. The 52nd card in 
the deck is turned face up and that suit 
is trumps. 

Starting with the player on the 
dealer’s left, the player leads a card and 
the other players must follow suit if 
they can, or they may trump if they 
wish (provided that they are unable to 
follow suit). The player who wins one 
trick leads to the next, and the player 
who wins most tricks wins the hand. 

Let us assume that we are dealt the 
following hand: 


APC 21 


Table 1 Aa KO 10. 9 
SPADES: 0.0 0.0 0.5 
HEARTS: 0.5 0.5 0.0 
DIAMONDS: 0.5 0.0 0.5 
CLUBS: 0.5 0.5-0:5 


SPADES (trumps): A K 4 2 
HEARTS: Q 1075 
DIAMONDS: K 109 6 2 
CLUBS: J8 6 4 


and that the 7 of spades is the card 
turned up. It is our turn to lead first. 

At the start of the hand we know 

absolutely nothing about which cards 
our opponents hold, except for the fact 
that between them they hold all 34 of 
the unseen cards. But we do not have 
any indication as to how these 34 cards 
are distributed between the unseen 
hands, so the probability of each of the 
cards being in a particular hand is 0.5. 
We can therefore begin to construct, for 
each of our opponents (Bill and John) 
probability estimates for each card in 
the deck. At the start of the hand the 
estimates for each of them will be as 
shown in Table 1. 
Assume that we lead the 4 of spades, 
and that the next player (Bill) plays the 
9 of spades and the third player (John) 
takes the trick with the Q. What have 
we learned about the probabilities of 
the other cards, if anything? 

Before answering this question I 
must explain an important theorem 
from Probability Theory, called Bayes’ 
theorem. 


Bayes’ theorem 


Let us suppose that there are two bags, 
each containing five balls. Bag A contains 
1 white and 4 black balls, bag B con- 
tains 3 white and 2 black balls. I take a 
ball at random from one of the bags, 
and the ball is white. What is the proba- 
bility that I took the ball from bag A? 

The probability that a ball selected 
at random from bag A will be white is 
1/5. 
The probability that a ball selected 
3 random from bag B will be white is 
3/9. 

Bayes’ theorem shows that the pro- 
bability that a randomly selected white 
ball actually came from bag A = 


1/5 =1/4 
(1/5 + 3/5) 


The reader will be able to generalize 
from this example, and the application 
to our game of cards will soon become 
apparent. 


What have we 
learned? 


Let us now return to the question of 
what, if anything, we have learned 
about Bill and John’s hands from the 
cards they played to trick one? We pro- 
bably cannot say very much at all about 
Bill’s hand at the moment, but we 
already know something about John’s 
cards. 

John took the first trick with the Q 
of spades. The A and K are in our own 
hand and so the only cards that John 
could possibly have used to take the 
trick were the Q, J and 10. If John had 
held the Q and 10 but been missing the 
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0.5 0.5:0.5 0.5 0.0 0.5 05 0.0.05 0.0 
0.5 0.0 0.5 0.5 0.0 0.5 0.0 0.5 0.5 0.5 
0.5 0.0 0.0 0.5 0.5 0.0 0.5 0.5 0.5 0.0 
0.0 0.5 0.5 0.0 0.5 0.0 0. 0.0 0.5 0.5 


S201 (65+). 64 9S = 


J, he would have played the 10, so from 
the fact that he played the Q we know 
that his original spade holding included: 


Q, J and 10 or Q and J or Q (without 
J or 10). 


Now we can use the tables of probabili- 
ties for the individual cards to determine 
the a priori probability that John held 
each of these three holdings: 


Probability that he held the Q, J and 10 
=05x05x0.5 =0.125 


Probability that he held the Q and J but 


not the 10 = 0.5 x 0.5 x 0.5 = 0.125 
(Note that since the probability of his 
holding the 10 is 0.5, the probability 
of his not holding it is 1—0.5=0.5) 
Probability that he held the Q but not 
the J or 10 =0.5x05x 0.5 =0.125 


And from Bayes’ theorem we can 
show that the probability that the Q 
came from each of these three holdings 
is: 

Q,J,10: 0.125/(0.125+0.125+0.125)=1/3 
QJ: 0.125/(0.125+0.125+0.125)=1/3 
Q: 0.125/(0.125+0.125+0.125)=1/3 


Note that had the calculations been 
performed later in the hand, when the 
probabilities were not all equal (0.5), the 
final values would not all have been 1/3. 

From these last calculations we can 
see that the probability that John holds 
the 10 of spades is 1/3 (in which case he 
also holds the J), and the probability 
that he holds the J is 2/3. We can there- 
fore adjust the probabilities for the 
individual cards in John’s hand as fol- 
lows: 


For the 10 of spades: probability=0.333 
For the J of spades: probability=0.667 


For all other unseen cards the probabili- 
ties are equal, and these are: 


16—0.333—0.667 = 15 = 0.5 
Acs Sac 30 

Since there are 16 unseen cards in 
John’s hand, and 32 unseen cards in 
total (the probabilities of the J and 10 
of spades being in John’s hand are sub- 
tracted from the number of cards in his 
hand, and one is subtracted for each of 
them from the total number of unseen 
cards). 

If the probability of the J of spades 
being in John’s hand is 0.667, then the 
probability of it being in Bill’s hand is 
0.333, and by the same argument the 
probability of Bill holding the 10 of 
spades is 0.667. So we have been able to 
make some adjustments in the probabili- 
ties simply on the basis of John having 
played the Q of spades at trick one. We 
can also make note of the fact that if 
John ever shows the 10 of spades, we 
will know that he holds the J. 

At trick two, John must lead because 
he won trick one. He leads the A of 
hearts, we play the 5, and Bill trumps 
with the 8 of spades. What have we 
learned from trick two? First of all, Bill 
would obviously use his lowest trump or 
one of his lowest contiguous group of 
trumps. The 7 was the original face up 
card, we played the 4 on trick one and 
Bill played the 9. We hold the 2 of 


spades and so Bill’s 8 of spades must 
have been played from one of the fol- 
lowing holdings: 


and by using Bayes’ theorem we can 
determine the probabilities of each of 
the above cards being in Bill’s hand, and 
from these probability estimates we can 
determine estimates for the cards being 
in John’s hand. We can also adjust the 
probabilities for all the hearts: those 
which are not in our own hand must all 
be in John’s hand. 


Deducing 
information from 
the bidding 


In many card games there is a bidding 
phase between the deal and the play of 
the cards. The best known of such 
games is Bridge, but the popular Ger- 
man game of Skat is another widespread 
example (it is said that Skat can be play- 
ed by more than 50% of the entire pop- 
ulation of Germany). Since each bid has 
a meaning, it should be possible for the 
card playing program to learn something 
about its opponents’ hands from the 
way that they bid, and it can then 
adjust its probability estimates for each 
card in their hand. How this is done will 
obviously vary from one game to ano- 
ther. Let us take a brief look at Bridge, 
to see how we might modify the proba- 
bility estimates of the unseen cards in 
the light of the bidding. 

We are sitting South and hold 10 
high card points. We look at the 13 
cards in our hand and assign a probabili- 
ty of 1/3 to each of the reamining 39 
cards in each of the other three hands. 
West opens the bidding and bids one 
spade, indicating that he has a stronger 
than average hand and that spades is his 
best suit. (Of course, this bid can mean 
other things, but we shall assume for | 
this example that the above meaning is 
correct in the particular bidding system 
that West and his partner employ.) We 
may now adjust the probabilities of the 
spades, so that each spade in West’s pro- 
bability array has a slightly higher pro- 
bability (say 0.45 instead of 0.33), and 
we may also adjust the probabilities of 
the high valued cards (aces, kings, 
queens and jacks) so that they give an 
expected high card holding which cor- 
responds to a typical one spade opening 
bid. (If this bid is made with an average 
of 13 points, the ace counting 4 points, 
king 3, queen 2 and jack 1, then by 
making each of the high card probabili- 
ties 0.4333 we give West an expectation 
of 13 out of the remaining high card 
points: there are 40 high card points in 
total and we hold 10 of them, leaving | 
30, and 13/30=0.433). We should, in 
fact, give a slightly higher probability 
to a card which is both a spade and a 
high card. 

Having assigned new probabilities to 
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the spades and the high cards, we can 
then adjust the probabilities for the 
remaining cards in West’s hand, so that 
the sum total of his probabilities is 13 
(the total number of cards in his hand), 
and we can adjust the probabilities for 
each card in North’s and East’s hands by 
subtracting West’s probability from 1 
and dividing the result by 2, remember- 
ing to ignore all cards in our own hand. 

So from his first bid we can make 
quite a lot of probabilisitic estimates 
about West’s cards, and hence about 
those in the North and East hands. 

The bidding then passes to North, 
and depending on his bid we make 
adjustments to his probabilities using 
similar, logical arguments, and then 
we adjust the probabilities for West 
and East. This process continues until 
the end of the bidding — each time we 
acquire some information that increas- 
es the likelihood of a card being in a 
particular place, we increase the proba- 
bility for that place and reduce it accor- 
dingly in the other hands. When there is 
some negative information about the 
position of a card we use it in a similar 
way. 

By the end of the bidding phase a 
good bridge program should have a 
fairly accurate estimate of how each of 
the other three hands is made up. By 
summing the probability values for all 
the spades in a hand the program can 
get an estimate of how many spades 
that player holds. By summing the pro- 
ducts of the high card probability x high 
card point values, the program can esti- 
mate the number of high card points in 
each suit in each hand. It will then be 
better able to plan its play of the hand, 
and of course the probabilities will be 
adjusted all through the playing phase. 


How tousededuced 
information 


The most obvious use of our deduced 
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probabilities arises when the probability 
estimates for ail unseen cards are all 
either 1 or 0, i.e. we know where all the 
remaining cards lie. We then have a case 
of a perfect information game, and we 
can solve this game by performing a tree 
search to the end of the game. Even 
though there may be three or more 
players, the tree approach should still 
work, though we must make certain 
assumptions about the way that the 
other players are going to make their 
decisions. For example, let us assume 
that we are two tricks from the end of a 
hand of our three-player card game. 


We hold: A of spades, 10 of diamonds. 
Bill holds: J of diamonds, 5 of clubs. 
John holds: 3 and 2 of clubs. 

It is our turn to lead (remember that 
spades are trumps). 


The program now constructs a game 
tree, of depth 6-ply. Part of the tree 
will look like the above diagram. 
We assign to the terminal nodes of the 
tree, scores corresponding to the num- 
ber of tricks won by each player, and 
we back-up through the tree until we 
can determine which card should be 
played next. In this example the situa- 
tion is simple because if we lead the A 
of spades first we may take two tricks, 
whereas if we lead the 10 of diamonds 
we can only make one trick. Note the 
use of the word ‘“‘may”’’. In order to 
make two tricks we need some help 
from Bill, who must make a mistake 
and discard the J of diamonds in the 
hope that our second card is the 2 or 
3 of clubs and he will make his 5. But 
since we lose nothing by playing the A 
of spades first, that is clearly the best 
way to continue. How can we modify 
our traditional methods of tree-searching 
to cater for situations such as this one, 
in which we wish to allow for the pos- 
sibility that our opponent will make a 
mistake? Fortunately the problem has 
been solved for us, by the ubiquitous 


Donald Michie, whose name crops up 
time and again in interesting research 
reports on various topics within the 
science of Artificial Intelligence. 


Expected valuesin 
backed-up trees 


Michie’s method, which I shall discuss 
in some detail in a later article, is based 
on the assertion that when searching a 
game tree it is unreasonable to assume 
perfect play by the opponent, since 
there must always be a finite chance 
that he will not choose the best move. 
Let us see how this helps us to search 
the above tree. 

We may simplify Michie’s concept as 
follows: If there is a 99% chance that 
Bill will play the 5 of clubs from posi- 
tion P,, and a 1% chance that he will 
play the J of diamonds, then since the 
5 of clubs will give us a score of 1 (i.e. 
we take one trick) and the J of dia- 
monds will give us a score of 2, the 
expected value to us of position P, is 


(0.99 x 1)+(0.01 x 2)=0.99+0.02=1.01 


whereas if we play the 10 of diamonds 
from position P,, the expected (in fact 
the certain) value of position P, will be 
1 (i.e. we will take one trick no matter 
how Bill and John play). Since 1.01 is 
greater than 1, we should play the A of 
spades from Pp) because it maximises 
our expected score. The reader will pro- 
pably have realised by now that not 
only does Michie’s method allow us to 
optimize our practical chances when 
we know exactly where all the unseen 
cards lie, it also enables us to use our 
probability estimates of the locations of 
the unseen cards, to build game trees 
which will help in the play of the hand. 
In other words, Michie has shown us 
how to play with the odds! 


Task for themonth 


Find or invent a simple card game in 
which information may be deduced 
from the play of the cards. (Avoid 
bidding games, unless you are extreme- 
ly confident and have many free hours 
this month.) Write a program to play 
this game, modifying the probability 
estimates of the unseen cards in the 
light of the user’s play. Experiment with 
various methods of adjusting these 
estimates until the program plays at 
least moderately sensibly. At the point 
in the game where exhaustive search 
will not be too time consuming, set up 
a probabilistic game tree a la Michie to 
search to the end of the game. 
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é Have we gota 
i ISICALC NOW FOR TRS80 


Students, Brofessoge, smal businessmen, everyone raves about VISICALC. Permits you to dispense with pencil, paper and calculator — insteac 
you have an ‘electronic sheet’ to do your calculations, projections and planning. You can calculate sales projections, income taxes, personal 
budget, cost estimates, engineering changes — even balance your own chequebook, 


VISICALC is partitioned into a matrix of rows and columns. At each position in this matrix you can define a title, formula or number. By 
writing on your ‘electronic sheet’, you can set up individualised charts, tables and records. 


VISICALC can recalculate any problem. Suppose you change a number you had previously ‘written’ 
on the ‘electronic sheet’. Like magic, the computer will remember the original formulas and calcula- 
tions you've used and all the other related numbers on the sheet change before your eyes. VISICAL' 
automatically recalculates all the relevant formulas. Recalculation makes VISICALC a powerful 
planning and forecasting tool. Not only can you effortlessly correct mistakes and omissions, you Car 
also examine various alternatives. 


For example, imagine you are doing sales projections using VISICALC. You may want to know whe 
the impact on your company will be if a specific product doesn’t sell as well as you anticipate. What 
you sell only 200 a month instead of 250? What if you sell 300? What if one of your salesmen quits 
and it takes his replacement six weeks to catch up? With VISICALC to assist you in performing thes 
calculations, you can save countless hours. 


It has been said that VISICALC alone justifies the purchase of a microcomputer! 


An invaluable piece of software for everyone... TRS80 32K disk only $195. 


Also available for APPLE II 32K with one disk . . . $195 
10 RE GRE SE SR GRE RE A SE UN OE RE ST EE SS ee 
IF YOUWANTTOLEARNABOUT  —_— 
COMPUTERS, BUT DIDN’T KNOW ts” 


WHICH MACHINE TO BUY, THEN 
THIS 1S THE MACHINE FOR YOU. 


The COMPUKIT 101 is a real com- 
puter — start with 4K RAM memory 
and full 8K Microsoft Basic in ROM. 
The COMPUKIT 101 connects 

directly to your TV — just assemble, 
hit ‘RETURN’ and GO! A cassette 


335 388 


Be 6502 based system — best value for money on the mark 
Powerful 8K Basic — fastest around 

Full Qwerty Keyboard 

4K RAM expandable to 8K on board 

Power supply and RF modulator on board 

No extras needed — Plug-in and go 

Kansas City Tape Interface on board 

Free Sampler tape including powerful Dissassembler an 
Monitor with each Kit. 


~COMPUKIT 101 kit, including all parts, manual, 


OO 10O2 0) OF OOO 


interface allows you to use a normal - RF modulator and power supply $595.( 
cassette recorder to save and load _ Additional 4K RAM Memory (fits on board) 85.( 
programs. Because the COMPUKIT _ Assembler/Editor tape 25.( 


: : Screen Editor tape 6. 
- Space Invaders (8K) 
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ADVENTURE by Scott Adams is like no other program you 6. STRANGE ODYSSEY — marooned at the edge of the 


101 is available only as a kit, the 
savings are enormous. 
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have ever seen. ‘‘Out of 50 programs reviewed, ADVENTURE 
was rated No. 1... highly recommended’’ —’80 Software 
critique. 


Defeat exotic wild animals to get treasures or work out how to 
get out of a quicksand bog — nine different adventures now 
available. 


1. ADVENTURELAND — you wander through an enchanted 
world trying to recover the 13 lost treasures. You'll 
encounter wild animals, magical beings and many other perils 
and puzzles. 


PIRATES ADVENTURE — you'll] meet up with the pirate 
and his daffy bird along with many other strange sights as 
you attempt to go from your flat to Treasure Island. Can you 
recover Long John Silver's lost treasures? 


MISSION IMPOSSIBLE ADVENTURE — hello, your mission 
is to... and so it starts. Will you be able to complete your 
mission in time? Or is the world’s first nuclear reactor 
doomed? This one is well named. It’s hard, there is no magic, 
but plenty of suspense. 


VOODOO CASTLE — Count Cristo has had a fiendish curse 
put on him by his enemies. There he lies with you his only 
hope. Will you be able to rescue him or is he doomed 
forever? 


THE COUNT — you wake up in a large brass bed in a castle 
somewhere in Transylvania. Who are you? What are you 
doing here and WHY did the postman deliver a bottle of 
blood? 
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Galaxy, you've stumbled on the ruins of an ancient alien 
civilization complete with fabulous treasures and unearthly 
technologies. Can you collect the treasures and return or will 
you end up marooned forever? 


7. MYSTERY FUNHOUSE — can you find your way com- 
pletely through the strangest Fun House in existence or will 
you always be kicked out when the park closes? 


8. PYRAMID OF DOOM ~— an Egyptian treasure hunt leads you 
into the dark recesses of a recently uncovered Pyramid. Will 
you recover all the treasures or will you join its denizens for 
their long eternal sleep? 


9. GHOST TOWN — explore a deserted mining town in search 
of 13 treasures from rattlesnakes to runaway horses — this 
adventure’s got them all! (Also includes new bonus scoring 
system!) 


TRS80 16K — $19.50 each 
APPLE || 24K — $19.50 each 
SORCERER 16K — $19.50 each 
SYSTEM 80 16K — $19.50 each 


JUST RELEASED: 

Can't figure out how to get the ox out of the bog or where the 
Pharoah’s heart is? These and many other clues are given ina 
special format actually designed to help you as little as possible 
but still let you solve the ADVENTURE. 


ADVENTURE HINT BOOK (1-9) only $12.50 


We 


-DITOR/ 
\SSEMBLER PLUS 


ow get every feature of Editor/Assembler 
d T-Bug all in one package PLUS — many 
g computer’ features to simplify your 
sembly language programming and de- 
igging. Don‘t waste time creating both 
urce and object tapes — ASSEMBLER 
-US assembles directly into memory. 
acros are supported: simply define a 
acro and frequently used sequences are 
tomatically assembled. Seven new ex- 
essions. Improved symbol printout and a 
ash command to give you more storage 
ace for general text editing! The Editor is 
proved with commands like Substitute, 
ove, Copy and Extend, for moving blocks 
d repeating them anywhere for searching 
d substituting occurrences in the text. A 
yge command is available for both Edit 
d Find enabling you to operate ona single 
e or a range of lines. The debugger, 
3ug, allows up to eight breakpoints, 
gle-stepping, etc. 


9ITOR ASSEMBLER PLUS comes with 
eighty page manual. 


{S80 16K tape $39.50 


3ALAXY INVASION 


he newest and most exciting Invaders- 
spe game yet! Turn your TRS80 
to a video game arcade. GALAXY 
NVASION is based on MOON ALIEN 
a phalanx of space invaders above the 
irth: you are the sole defender. As you 
re your laser at the invaders, they 
voop down and bomb you, but there 
e no bases to hide behind! 


icredibly smooth graphics and great 
und, 


ighly recommended 
RS80 16K Tape $19.50 
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ASTEROID 
NOVA 


If you liked ‘Invaders’, you will love 


» ASTEROID NOVA. Finally ASTEROIDS 
, come to micros: Your spaceship is travelling 


in the middle of a shower of asteroids. Your 
laser is your only defense against the 
asteroids. Blast them but beware — big 
asteroids fragment into small asteroids and 
you are surrounded! From time to time you 
will encounter an alien spaceship whose 
mission is to destroy you, so you'd better 
destroy it first! High resolution graphics and 


program for you! 


SUPER INVADERS 


The video game that swept the world now 
comes into your own home — original 
graphics and sound: 55 aliens advance and 
shower you with lethal arrows; as you shoot 
them they quicken their descent. Written in 
machine language for rapid action these are 
the best versions of the Space Invaders 
video game: totally graphic and twice the 
speed of Alien Invaders; includes sound!! 


TRS80 16K — $24.50 


super sound effects. APPLE II 32K — $29.50 


APPLE II 32K disk $29.50 
TRS80 Level II 16K tape $19.50 


FOR THE SINCLAIR 


‘30 PROGRAMS FOR THE SINCLAIR ZX-80: 1K’ 


page book which 


is a-unique 11 
contains 30 programs all designed to fit into your basic 1K version of the SINCLAIR ZX-80. 
In programs which go far beyond anything that has been published the authors show the 
unique Capabilities of the Sinclair ZX-80. The ZX-80 is more powerful than you ever 


thought! 


BLACK JACK — Actually contains a full pack of cards, 
shuffles them, keeps track of the dealer and player card 
totals, and the money bet, all within 1K. 


MEMORY LEFT — An incredible routine, especially 
useful as it enables you to know exactly how much 
memory is left, even during the running of a program. 
This also illustrates USR routines. 


DR. ZX-80 — A conversational program with ‘the 
computer as analyst which uses an ingenious method of 
storage. 


GOMOKU — The computer challenges you to this 
complex Japanese game. Incredibly this program 
including display of the 7 x 7 board fits into 1K; it 
only does so because it uses the display as memory! 


‘This book is excellent!’ — Clive Sinclair 


Other programs included are HORSE RACE, LUNAR 
LANDER (with moving spaceship), NOUGHTS & 


CROSSES, NIM, SIMPLE SIMON, HANGMAN, LIFE, MASTERMIND, PINCH and 17 
others. 


As well as the programs, the book illustrates programming techniques you can. use in your 
own programs — space comprehension, PEEKs and POKEs, USRs and so on. Offering 
program value of well over $40, the book is available for $12.50. 


COMPSHOP AUSTRALIA 


Compshop Australia 
Office 4, 75 Palmerston Crescent 
South Melbourne, Victoria. 


| have a microcomputer. 


Please send me your software catalogue. | enclose a stamped self-addressed 
envelope. 


= Please send me 


| enclose a cheque/postal order for $ 
(plus $1 for post and packing) 


Signature: 
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CBM 3032 


MicroPro Design is now available to offer the Commodore microcomputer system at prices you 
can afford! We specialise in the design and manufacture of custom microcomputer equipment and have 
turned our efforts to the CBM and PET. 


Besides having the full range of standard Commodore products available, we can offer interfaces to 
allow virtually any piece of equipment to be connected to the CBM through the |EEE 488 bus. 


You can now also use our MicroCon general purpose microcomputer as a slave to the CBM. This 
allows you to connect A/D, D/A convertors, digital inputs and digital outputs for industrial control, mon- 
itoring and data aquisition. Programmes for the MicroCon can be created in the CBM and loaded down the 
[EEE 488 bus into the MicroCon for execution. 


A tew of the current devices now available for use with CBM and PET 


TEER 406 = AS232 IN ER PACE 2 6 ee $ 350.00 
[EEE 408 — CENT RONIGSINTERPACE |< os $ 250.00 
[EEE 488 —-BIABEO ICOM OUME} = oe $ 420.00 
TEE E466 —IMICROUON INTERFACE =) oe So $ 200.00 
CELOEVP RINGER (G-C0L 125 CPS. $ 970.00 
DIABLO W.P. PRINTER (WITH INTERFACE) .........:. $3500.00 


Above prices include all cables and connectors where applicable but do not include sales tax. (Dealer 
enquiries invited). 


Write or call forall prices on the Commodore equipment. 


SPECIALISTS IN THE DESIGN AND MANUFACTURE OF MICROPROCESSOR BASED EQUIPMENT 


LA MicroPro Design Pty.Ltd. 


P.O. BOX 153, NORTH SYDNEY, NEW SOUTH WALES, 2060, AUSTRALIA. 
SUITE 205, WENTWORTH HOUSE, 6—8 CLARKE ST., CROWS NEST, NSW, 2065. PHONE: (02) 438 1220. 


APC-80 


Many improvements available for.the TRS-80 require some form of hardware modification but perhaps the most 
interesting require only a little delving into the heart of the TRS-80, its ROM, and some rearrangement of the 
way it conducts itself. In this first instalment of APC-80 Ian Davies establishes the new TRS-80 behaviour 
pattern and introduces five new commands to the Basic repertoire. 


You may have wondered about that 
dark expanse of memory from 12288 
to 17128 usually referred to as 
“reserved KAM’. You may even have 
experienced the terror of a program 
over-writing part of it and fleeting off 
into a world of its own, interrupted 
only by a power-down. APC now has 
a peek at reserved RAM and how it 
can be used to turn your TRS-80 into 
an APC-80. 

Much of the information in this series 
relates to the assembly language source 
listings. It is not necessary to have an 
understanding of assembly language, or 
how APC-80 uses reserved RAM, to be 
able to use the programs presented here. 
Detailed descriptions of the assembly 
language programs are included for 
those with an understanding of assembly 
language and as a guide to potential 
contributors. 


Vectors 


As a TRS-80 executes a Basic program, 
it branches out from ROM between 
every instruction to check the keyboard 
status. Therefore, there is actually more 
than one process being executed con- 
currently. This is only one example; 
there are many more — all vital to the 
machine staying in control of itself. 

Most of these processes involve 
some form of vectoring, a concept 
used by the ROM’s authors to make it 
possible to effectively grab hold of the 
computers attention as it emerges from 
ROM to begin a particular house- 
keeping duty such as scanning the key- 
board. The TRS-80 would be a fairly 
inflexible beast if no provision were 
made for such program interruption. 
For example, should you want to 
service the keyboard in a special way 
that hadn’t occurred to the ROM’s 
authors, then you would have to im- 
plement a USR call to a machine 
language routine. While this solution 
would work, it’s a ‘“‘sledge-hammer”’ 
technique. It would require modificat- 
ion of your existing software to include 
the new input. Even then, the system 
functions (break, pause and command 
mode) would still use the normal input 
routine. 

There are two forms of vectoring 
available. The first, used by ROM before 
calling a routine, involves looking at 
three bytes in reserved RAM. These 
usually contain a return instruction so 
the interpreter simply continues exec- 
ution from where it left off. If, however, 
a jump instruction is encountered in 


these bytes, another routine has been 
specified and will be performed before a 
return to normal program execution is 
made. 

The second type of vectoring is more 
direct. The interpreter loads a two byte 
value from the reserved RAM vector and 
executes the routine specified by that 
value. 

The first method is used when the 
ROM routine must be executed, even if 
some other routine is to be used (the 
‘AND’ vector). The other method is 
used when the ROM routine may be 
completely replaced by another (the 
‘OR’ vector). For our purposes, the 
two methods can be considered func- 
tionally identical. 

When the TRS-80 initializes, it 
moves values from ROM into reserved 
RAM thereby setting up the vectors 
for normal operation. Initialization 
occurs after a power-up and is the only 
way of performing a “‘true”’ reset (after 
all, you don’t loose your Basic programs 
when you press the reset button. The 
pointers for your code are retained in 
reserved RAM). 

Microsoft, the author of the Level 
II ROM, had enough foresight to provide 
vectors for most useful routines and 
checkpoints. There is no doubt this 
was done for their own use in the 
introduction of Disk Basic. But there is 
nothing to prevent mere mortals from 
using them either. 


Auto repeat 


The first routine in APC-80 adds a 
flashing block cursor and an auto repeat 
function to the TRS-80. As is standard 
on terminals, the auto repeat takes effect 
only when a key is held down for 
longer than about half a second after 
which that character is repeated ten 
times a second. 

Once you have tried it, you can adjust 
it to suit your mood or application by 
POKEing a value into (for a 16k 
machine): 

32240 for the repeat latency 

32277 for the repeat frequency 

32305 for the cursor flash rate. 
Larger values increase the time factor 
in each case. 


New commands 


This is the part we are quite excited 
about as it has applications beyond the 
realm of normal protectéd memory 
routines. It introduces new commands 
to the TRS-80 in a very elegant and 


efficient manner. 

Five new commands have been added. 
In future issues the list will be greatly 
expanded though you will not have to 
retype the routine. We’ll be presenting 
a list of changes required to upgrade the 
superceded version. 

The APC-80 Version 1 extended 
commands are: 
CHAR 64 — will convert the screen 
back to sixty-four character mode 
without executing a CLS. This comm- 
and’s main use will be in graphical games 
though it can also be used to produce 
double spacing (see examples below). 
CHAR 32 — has the same function as 
PRINT CHR$(23) but is more con- 
venient to use. 
BEEP —<exp 1> , <exp 2> —-where 
<exp > is a numeric expression of any 
sort, between O and 255 (it undergoes 
truncation if it is non-integral). The 
command outputs a square wave through 
the cassette Aux plug. Either connect a 
speaker to the earphone jack of the 
cassette recorder (and place the unit in 
record mode) or plug the Aux line into 
an amplifier. The generated frequency 
corresponds to the value of <exp |> 
and duration to that of <exp 2=>. 
BUZZ < exp> — is similar to BEEP ex- 
cept that it uses the cassette relay to 
make a small buzzing sound. <exp> is 
the duration of the buzz and must have 
a value between O and 255. I must warn 
you that the cassette relays are not re- 
nowned for their long life and so pro- 
longed use is not recommended. 
DIE — is equivalent to typing SYSTEM 
and answering the prompt with a /O, 
but can be used within a program. 
These commands can be used in pro- 
grams or in the command mode. They 
are fully syntax checked and integrate 
smoothly with Level II and Disk Basic. 


Getting started 


If you own an editor assembler, type in 
the source code shown in Fig. 1. The 
ORG value is set for a 16k machine so 
other values will have to be inserted if 
you own a computer of different 
memory size (the ORG value should be 
1k below the top of memory). 

The Basic version is designed for a 
16k TRS-80 and loads the machine code 
from DATA statements into protected 
high memory. To use APC-80 just type 
it in, or load it from cassette after sett- 
ing the memory size to 31767 after 
power-up, and RUN it. The Basic 
program can then be cleared by typing 
NEW and APC-80 engaged by typing 
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with a slash (/). 


Future directions 


We want to encourage your particip- 
ation in this project and so wed be 
pleased to hear from anyone with a 
‘routine to be added. to the system or 


Auto Repeat/Flashing Cursor 

As can be seen in the assembly source 
listing (Fig. 1), the first task is to set up 
the relevant vector. This can be done 
directly with an editor assembler, but I 
encourage authors to employ the method 
shown as this will ensure compatibility 
with people using the Basic version. 

The modified vector’ is normally 
used in the ROM keyboard scan routine. 
This routine is called between three and 
five hundred times a second when the 
machine is idle (waiting for input) and 
once between each Basic program 
statement execution. 

The new values given to the vector 
direct the interpreter to a routine called 
REPEAT in high memory. which saves 
the HL register pair and calls FLASH. 


FLASH maintains a counter which is 
decremented once every call. If the 
counter is greater than zero, FLASH 
calls the ROM keyboard scan (to which 
the vector normally points) and then 
returns to REPEAT; if the counter is 
equal to zero, it is reset, the cursor 
toggled, ROM keyboard scan routine 
called and control returned to REPEAT. 

REPEAT analyses the keyboard scan. 
If a key has been freshly pressed then the 
repeat counter is reset to pause 1, the 
value of the key stored and control 


SYSTEM and answering the prompt 


even just an idea but not a clue about 


how to implement it. 


Just a few of the possible future 
routines that have already occurred to 


us are: 
WAIT <exp > 
DRAW X1, Y1, X2, Y2 
ON BREAK GOTO 


If youre 
to APC-80, write to Ian Davies, APC, 


MOVE < line number> , 
<line number> 
FIND <string exp > 
non destructive cursor 
full cursor movement 
interested in contributing 


RENUMBER <start >,<increment> P.O. Box 115, Carlton, 3053. 


How it works 


passed back to ROM. If no keys have 
been freshly pushed, the routine checks 
whether any keys are down and if not 


‘returns to ROM. If any key has been 


pressed the repeat counter is decremen- 
ted by one and control either returned 
to ROM (if the counter is greater than 
zero) or the value of the key saved and 
the counter reset to pause 2 (if the 
counter equals zero) before returning. 
This simulates a freshly pushed key. 
The routine also resets the FLASH 
counter to ensure it behaves correctly 
when auto-repeating. 


New Commands 


When Level II Basic encounters an error 
it immediately checks an ‘OR’ vector 
which Disk Basic resets to divert the 
interpreter to its own error diagnostic 
(producing, for example, SYNTAX 
ERROR instead of ?SN ERROR). If 
Disk Basic is not resident, the inter- 
preter vectors back to Level II’s 
diagnostic. Hey 

APC-80 sets the vector to point to 
the routine TRAPPR which instigates 
a return to the Basic error routine if the 
encountered error is not syntactical. A 
table search is then executed to deter- 
mine if the error resulted from an 
APC-80 command. If so, program exec- 


ution is directed to the appropriate 
routine which may reside in ROM, 
RAM or a mixture of both. 

After performing the routine, the 
remaining portion of the current Basic 
program line is checked and errors 
indicated by a ?UE message. If no errors 
are encountered, the relevant pointers 
are adjusted and a smooth re-entry is 
made into Basic. 

One complication does arise while 
using this vector. The ON ERROR 
command is consulted before the 
vector. Therefore, if the ON ERROR 
command is activated, when the inter- 
preter encounters an APC-80 command 
and calls the error routine, the ON 
ERROR command will direct the in- 
terpreter to the required Basic line 
number. A solution is effected by the 
routine RESETR, which ensures the 
APC-80 table search is executed before 
the ON ERROR routine. 

The advantages of trapping normal 
Basic interpreter function by resetting 
vectors is that all the facilities of Basic 
are retained (except for the full length 
diagnostic messages in Disk Basic) and 
extra commands appear as though they 
are part of Basic instead of requiring 
prefixes such as CMD “BEEP”’, 


oe: 89055 
@| Fig. 1 ® BBBSE FLASHER ROUTINE ® 
56061 BOES7 5 EXHEELELHESEESE KEKE 
@ | vue BGBG2 ORG 3222 2 |@ 66058 @ 
18663 ad Sass — FLASH PUSH = HL : 
Se — He 7E26 2 B LO HL »¢| FCOUNT > 
G30G BGGG4 PHUSEL EQU @30G Hs TIME UNTIL REPEAT EFFECT ay 
@ | «ise GGG65 PAUSE2 EQU @16GH 4% TIME BETWEEN REPEATS ® rae <8 G0061 OEC HL + DECREMENT FLASH COUNTER ® 
ee eee Ey eee eae, ms es : 
we6C 7 ; LC H 85 ENTRY POINT TO B FEDER 2 : 
@ | ase3 BOUOS INPUT EGU  G995D 5 NORMAL INPUT VECTOR e bese Speman. comes a ee ee ee 
4028 gooie curros equ seco; TaMG  PRIMREN FLASHES ss LRH) * 
- ; x PEZC EEUG @8267 OR @D@H ; OTHERWISE TOGGLE IT 
CURSOR POSITLON i 
Re | . @8a68 LO (HL 7E2E 77 oA 
4616 Dore IEC E 2 0U 1646 6 = + LOCATION OF INPUT VECTOK PEZE 216083  G@@69 LO HL»F TIME 5 AND RESET COUNTER & 
® 39012 @ | 7€32 223976 90070 FSKIP LD FCO, UNT > sHL 
6GG14 7ESS El 80071 POP HL 
B@G1S + PRELUDE CODE: KEYBOARD VECTOR oct SS wee JP INPUT + AND VECTOR OFF. 2 
2 BO16 SET- yp, EXECUTED : 92973 
GBG1T 5 ONCE gNLY. E39 S003 ers Roegesa a FTIME ® 
0G013 : sg — ic 
@) voce cten70 = goes ENTRY = LU HL»f EPERT @ | E30 0@ @8876 CHAR OEFB GH 
@ PUEL 221646 © gaaze LU © LNUECT )+HL 7DDE 93077 END ENTRY ° 
“OES 316666 66821 LO SP »8 6@GH Pras SOL RIS 3251" 
POE? C3CCG6 = GBBzZ JP BASI ¢ sd SUL 
@ UBBES TFS SECS shies Tits Lo HeBL SR» SET UP VECTORS: @ 
BubE4 48138 Lu SiH ER ILA 
UBbZS 5 ney KEPEAT RUUTINE @ : Hi gid 1 $s LU $i dH oak 
@ GOO26 5 *#eeeERREREREEEEEE EEEEE @ Ui pate aft soe Sane = 
66827 i aise aats Lu "ot 1i et Bary og be 
7DEA ES 88028 REPERT PUSH HL 3 BBL Pal LU HL eR ESETR 
@| 706 coiFze gaze CALL FLASH s (AND INPUT ROUTINE) is HB138 Lo $10 SH 3sHL 2 
70EE 210003 00038 Lo Hi »PAUSE1 = 3 wat sa we HLH ESSGE + GIVE MESSAGE 
Fi a? 88831 AND BBZHE . CHUL BHF 
@| 70F2 28e5 88032 JR 2 .NOTNEH > IF NOT FRESHLY PUSHED rif s1Quu6  GU218 LU SP BGGH & 
7DF4 32307E 88833 LD CCHHR DA 3 OTHERHISE REMEMBER IT € fr2e CSCEBG = Buse Je HBCL . EXTER COMMAND MODE 
OF : HSS 
e fieihg ee Se sh Pe pci AND GET OUT & (Pes 1CiF WIZ46 MESSGE  JEFH 1FIC HS 3.2 HOHE ULF eS 
70FC B6 @@836 KLOOP OR CHL>s OK» ITS NOT FRESHLY PUSHED CES aoe ee ee ee 
> -. rod iLHik i Jor i Sh Lj » LEER 
@| eo ee, 283? SLA Ls BUT LETS SEE IF ANY KEWS S ; Seay ee @ 
EG? fi? poets rae ay ot # ARE DOWN ANYHAY.... YFSR ES = = BBESH RESETR PUSH HL 
7E@3 2815 92040 JR Z-REXIT = 5 IF NOT. GIVE UP Se Bl etrageet enone ae HL». 4BE0H » 
# 7E0S 2A367E 00041 Lo HL»<RCOUNT > ad er eee hee Dale ak ® 
: cH a RSS be wi Te et FE it 
EBS FC reeeys — a OTHERHISE DECREMENT REPEAT COUNTER Pea FL WE Lt ree 
°| ieee SS ae ad 
4 ' bar) pa SAL at Pac 2 ot ie — 
7E@0 2008 «goose “I epee ae 7F47 2800 © aaaSG As ZNO HOVE 
& 7EQF 3EQ3 92047 LD hes + IF NOT ZERO. EXIT @| tes5 2aFus5 © aa36q Lt Hi 40 GH : & 
“Ell 32397E 90048 LG ¥ : Z SFSU 2erarr HBS PE Lu ERR UEC ooo 
ae ze14 216001 o0049 LO Repel g + OTHERWISE RESET THE wae “FSF 2lBube S35 ae) Ls BEA = 
rel’ SAS 258 LB As< CHAR) ; CPOE Gerusa 80390 Lu i902 GH eno 
E1A 2 PUSHED + SET AAS IF THE KEY IS FRESHLY noe ae HESEE HOMOWE Lo 4004 FSH s: 
7E1A 22387E 88051 REXIT LO «RCO Sig * apace 
@) rio 1 gaesz or ee Patiaade ite * uisse rae He : . 
rE1E C9 90853 RET PFSt CS Hd 3e Re 
® Be@54 30446 @ 


rest Fs 
Prom Eo 


F SASS 


BU 11 SB7E 
78 2AEEs 


“4, 
+ rae 


Pet os 


ro 2B 


ries EQSBFC FF 
GUS 3259 & 


FP Sis 
32 WS 


, oss 


FEBE UF 


Pa BOE 


irai EB 
Pre a ae 
7FSS BE 


ProS EB 


| FSS Luin 


; i8FS 


ve39 SEFF 
eyed br 
SecHsy 


Oris 
PPE 
rFAL 
‘FHI 13 
YFHU ULlBS"F 
“FHS Lo 
rFHS eS 
YFHH Ul 
VERE Ee 
FFAG SE 
Fido | © fear ni 
YFHE Sb 
,EHE cS 
rFBU ES 


“rBL 13 
rFBe 13 
rFbb. 1L3CE 


eFBS El 
VFBH C1 
PF BB UL 
YFBE HEF 
YFBU ScFBCF 
“FLY SAFE rr 
rFCS 3s2rkesyu 
“Fib FL 
PFEGCURL 
VFUS: Fl 
recs Ur 
PFCH CHLELU 
FLU 


VFDU C1 
mFUL Ul 
VFOe &1 
VFOS SAFE.’F 
°FU6 ZF 
EDT Si? 
?FU8 
*FUB He 
7FOC 2813 
7FDE He 
?FOF 
“Fee Fl 
tres 
PFEB SF 
PFE? El 
rFES ZAP STF 
PPEB céeFudu 
vF EE 
FEL AF 
TFFe SeFBrr 
YFES Fil 
“FFG C3 


7FF? BBBG 
YFFS Guue 
7FFB BO 
YFFC UGE 
7FFE 88 


S2eB40 


Usbses 


SRF APF 


S2FB7F 


SASH40 


USHe2ls 


HEI SE! 

EG EEL 

ats ae 
ESSE , 
Hu43y , 
HSE 
BEES LE 
BES 
Hi5.54 
BUSS 


BEIT E 
HESS 
SBS3y 
etaiatats| 


OO: 7: ! 
er 6 Wie 
2 EG Se Ss 


1%: 


HEFEB NMED 


aur 10 
BHP ZG 
Hr 36 
Hoe Sel 
BOF Se 


ois heat St 
MHF PR CHARLE 
Hey Se 
SiS habe 1S 
WESEE 


BIS28 

HES3B 

HBS4H 
JUSSU 


JUSEH » 
BUS » 
BOs» 


Busse 
YUSYE 
YUS1U 
YUIZU 
YU 3B 
Dystu 
UYISEY 
W'36U 
SS ke ras 
BUSS 
BUgSU 
B1vuE 
WLBLY 
Ulveel 
WLW 
Hiud 
JLUSU 
Spel atg 


iat Cate 


cRRUR OCCURS. 


Pat UELU OER THAT 


JUHPS IH KHER Ab 
TRAMSPARENT LY 


jee 


tt OPERATES 


THE INT ERPREIER. 


TRHAFFR 


WORDLE? 


THe 


WiwUere NES THU 


WLBSE 


HIBS SKLPCH 


WL LY 
WLLLY 
ULL2Z8 
B113u 
JLi4e— 
Wills 
Blibk 
WLLL TB 
W11lsu 
81138 
W1ilst 
ULIS2 
Yiewu 
dl21y 
Bleu 
W1l2SE 
WL24u 
B12ZSU 
WJleébu 


RE TURIN 


81278 WINDUP 


Yless 


Giese QUl) 


u1lseG 
U131B 
B132u 
G1336 
61346 
81358 
B136u 
B1i3¢’e 
ULSsuu 
Gidiu 
Bideu 
81436 
W144u 
¥1l4Su 
1466 
614° 
W14dsH 
91438 
U1SUu 
YulS1u 
B1Scu 
Bisse 
61546 
61556 
81566 
G15"B 
81588 
W153 
81606 
al6ig 
61626 
Bi63Y 
1646 
61656 
41660 
41676 
61636 
816388 
81788 
81718 
1726 


BUMB 


START 
ERRVEC 
FLAG 
CURSA 
FLAGE 


+ THIS LS THE SYNBOL TABLE FOR USE BY THE DECOUER 
IT CONTAINS 3 ELEMENTS FOR EACH SYMBOL: - 


FSH 
FUSH 
ea: 
SUS 
Lil 
LU 
Uk, 
Jr 
OSH 
SuisH 
LU 
Li 
LO 
ANU 
JF 
LO 
Lu 
Li 


Hoo 


LU 


Li 


DIN 


LIWe 


LU 
PUSH 
PUSH 
FOF 
Ess 
Lu 
Lev 


INU 
LHU 
LMU 
UdJHe 
Jk 


PUSH 
PUP 
FUP 
PUP 
UK 


HF 

HL 

Hei G@SAH? «> GET ERROR Code 

S2H » HUST BE TSN ERRUR 

Ha 

Het PLHG? » CHECK FOR RECURSIVE ENTRY 
H 

He sis UIT 


Ue» MARE SUNE Rou 

Se 

Dr»: HOLE “3 FIR TO TABLE 
Hi» 482EH> » PTR TO CODE 
HetH L: 

4 

NésivinEG IF 
BU». CUASH 2 
Sig BH BC 


Bil it BEI 


iMMEO MOGE 


Hiss © 

CSTART22HL > PLACE TO SCAN FROM 
HL»< START? « GOTO START OF Lint 
Het Vr? » GET HORD LENGTH 
oa » COUNT IH REG. E 

H » SET FLRGS 

‘er HOUP > IF ENO OF TABLE 
1HH > SRIF. GET & SEI 


#oHL NDLP 2 IF END OF LINE 
UES » SNH 
Hi 


fHUe* ALTUALLY CE 

Pett >» SNAF THEM BACE 
He,h EXSTWU 5 
CHAR LP 


URUP'S THRUUGH HER E IF THE TABLE ENTRY 1s H 
UIRECT MATCH HLIHTHE FIRST "S'MBUL" UF 
itd ERRKUR 


Heeos 
KPLHGJoK 
.4G— RH D.A > 
. 4UE BH ).H 
De ,. FUINTS TO VECTOR 

BL eRETURIN 

BL » RETURN RDDORESS UN STHLK 
HL 

be » HUVe SUURCE PTR TU BC 


TU END WICEL'S 


UesHo » HL PUINTS TU VECTUR 
Estkhu: 

Hi 

Bei hk 2 

Ub eA L » Hi GOUNTAINS VECTUR 
,HO 2 “UCRLL" ROUTINE 


UE » SKIF REST UF HURL 

UE > IN TRHBLE ANU lis 

UE » VECTORS. Fulhi 

‘sh CH » AI NEST LENGTH. 
HURU LF 


BE oe GET IT BHUK FUR bHS1C 
HL 

BL 

Ue 

H 

SFLHG oH 

Hat k LAGE 2 

.96F GHSoH 

fi- » CLEHR UFF SITHLR 
HF 

HE 


LWH » CHECK FOR ERRORS HIER i! 


LF Ub. 
2 ELSE 


Z,101EH - 
2BBs 4 

BL 

UE 

AL 


TEU ERRUF 


Het FLAG2) »« CHECK ON ERRUK STHIUS 


UsH 


He, ERRVEC+1> 5 AND ON ERRUR FULNIER 


D 

éobU ts » FUR ERROR MESSAGE 
H 

KFLH Gs 

HF 

Hid WSHH) =» GET ERROR CODE 

bsH 

HL s CLEHR STHUK 

HLes ERRVEL ? 

L3H » EXECUTE "ON ERROR" CUUE 
ai 

(FLH G 2H 

HF 

ul 

3) 

Ss) 

J 

re 


THE LENGTH IN CHARACTERS 
THE NAME 
THE VECTOR FOR ITS ROUTINE 


A LENGTH OF ZERU ENOS THE TABLE. THE TABLE SHOULD 
BE PLACED Hi1H FLENT'Y GF ROOM FOR EXPANSION. 


IF <> GOTO HEST WuRL 
s CONTINUE IF STILL = 


» UU ITT FOR Neat HURL 


®9@e@6mcemUCcOmUC UOWUC OUCOUCOUOUCOUCOCCMOUCOCUCOUCUCOUC OUC OU COUCOUC OCUCOWUUCOUC OU COU OWUCOUUCOUG 


rESB 61736 URG $2347 
J17°46 
7ESB 66 81756 TABLE DEFEb 6 
7ESC 43 B1i76e OEFH “CHA R3e 
7EB2 FEBS 61776 UEFW USFE H 
41738 
7E64 66 81736 DEFB 
PEBS 43 61968 UEFM “CHA R64 
7E6B C364 G1S1G GEFW 64CS H 
41328 
VE6U 63 81836 DEFE 3 
7EBE 44 6184u OEFM “DAE.” 
YE?1l Bsus 6135 UEFW UBBu 
61868 
YEY3 64 61376 ‘ OEFB qe 
7E74 42 813880 DEFHM ‘BEEP’ 
YE?3 EB7E 813832 UEFW BEEF 
61996 
FEVA UF ¥1591G UEFB 4 
7E?B 42 81928 BEFM “Bue 2° 
7ECF SEE 61336 UEFH BUZZ 
613948 
YESt GY 61956 UEFB @ » END OF THBLE 
813966 
61976 
61938 
8139396 53 THIS IS THE BEEP ROUTINE, IT IS PLACEN 
62686 5 ULRECTLY BELOW THE INITIALISATION ROUTINE. 
82016 
82828 
P7EEG 62638 ORG 3243 G 
62640 
VEEG CS 92058 BEEP FUSH BL 
PEEL EL 82868 PUP HL 
VEEZ 23 82876 INC HL » SET UP SGURCE PTR [IN HL 
7EE3 CDIC2B 82888 CALL 2b1UH > READ FIRST PARAMETER 
7EES6 1C 82896 INC E 
VEE? OS 62188 PUSH DE « SAVE VALUE ON STACK 
VEES 3E2ZU 62116 LU AeZcH 
PEER BE 2128 GY SHED. S 
7EEB C24A1E 82138 JF N2o1 ESHH » CHECK FOR COMMA 
7EEE Dr 82148 RS] 16H 
EEF CO1C2B 62156 CALL 2B1iCH >» GET SECOND PARAMETER 
UZ16S 
2178 5 ‘START UF SGUND GENERATOR 
62188 : 
VEF2 3 02138 INC H 
FEF S Cl 62268 POP BC > FREQ IN C 
PEF SA SK 62218 LU UH s DURATION IN UO 
7EFS 3E61 32228 Lo A.61 « SET UP BIT PATTERN 
PEF? EEBS 82238 LUOP XOR 63 + TOGGLE BIT PATTERN 
TEFS OSFF 82248 GUT (GFFH).A 3 RAND OUTPUT 1T 
EFB 41 B2258: Eh Bel 2 MOVE FREQ INTU 6 
TEFC 16FE 82268 FREQ OUNZ FREG s AND DELAY 
ce en aeeon UEC Loop > LOOP FOR DURATION 
7FO1 2B 82298 GEC HL > AOUUST SOURCE FIR 
2 €5 82388 FUSH HL 
abe ei 62318 POP BC ; AND LERVE BACK IN BC 
7F@4 CS 62328 RET 
62338 
82348 
@235@ ; BUZZ ROUTINE. 
@236@ 3; NO FREQUENCY PARAMETER, JUST DURATION 
@2378 a 
Bess 62338 URG 3231 3 
H2390 
7ESE CS B2488 BUZE PUSH BL 
CESF EL 62416 PUP HL 
7E46 23 82428 INL HL 
7E41 CU1C2B 62436 CHLL 2BicH » GET DURATION INTU E 
YE44 1C 62446 INL & 
7E45 3A3046 82458 LO H»(4¢G30H) 3s GET SCREEN MODE 
B246U 
P7E4S LEGS 62476 Z2LUGOP XGR 4.4 TOGGLE GUTPUT VALUE 
7E4A O3FF 62438 OUT . GFF HDA + GIVE IT TO RELAY 
7E4C OB 7F 82436 LO B»7F H s FREQUENT’ 
PESeE 16FE 625688 Z2FREQ DINZ cFREQ » WHIT HERE 
7ESG 10 62518 DEC — . 
7ES1 2OFS B2526 Jk NZ.2c \UUP » LOGP FOR THE OURATIOGN 
7ES3 E6FB 62538 AND GF BH 
7ESS OSFF 62548 OUT < GFF H).A 3 MAKE SURE RELAY IS OFF 
VES? 2B B2558 GEC HL; ADJUST SOURCE FIR 
7ESS ES 62566 PUSH HL 
7E59 C1 S78 POF bu» PUT LT BACK INTO BL 
7ESA US B2588 RET 
62598 
i B266uU 
7FBS U2616 END INIT S 
BRS1lUL BELL UU WUVES 
HAR Yes YbureS UGEBSS BoWSG 
CURFUS 4¥cu BuUU1E BEVEL 
ENTRY /’O0E GEG1g UGGr* 
FCOUNT YE33 B8874 BBUdS BBVEE BOUru 
FLHSH YE1F GBBSS UwwbuUES 
FSKIF- PESc BvOrG BUS 
FTIHE U3G6 BEBBS G6U69 Gb6°4 
INFUT 83E3 BBBUS BBE Ee 
INVECT $016 UGB11 66626 
KEYBD 3861 BeuBuE Bdu3S 
KLUUP YUFC 66636 G60SS 
NOTNEN ?DFS BBe3s BBESE 
FAUSE] BSB BEBB4 6BG36 BEbrS 
PAUSES Y168 BBEBBS BBUS3 
RCOUNT °ESB GEG7S 68641 YWBGBS1 
REPEAT “OER BUCS BUE1S 
REXIE feElH BUBS1 66634 YBb4G GBbb46 
BEEF FEEY BeEwSU Vlogs 
DUMB SFFL Ulde6 BLISS 
Buée TESE BES B1l3suU 
CHHRLP FFSE UU’ rd Hd346 
CURSH VFFC 615-8 UBSBL BEBbbU 
cCRRVEC *FFS B15S6 6B3°6 B1336 b14d4du 
FLAG 7FFB B1S68 BBSbU BUI1U U11SU U1 
3.6 U1lssu 
FLHGe FFFE 61586 UB41U WBL1ZG1 VisuG 
FREW “EFC. B2cbu UcCcbU 
{HMEU FSS GUYbG BG556 
INITS FBS Buleu B2b1u 
LUOP rEFY G2z36 B22ou. 
MESSGE 7FeS B8248 BG1SU 
NEXTHO 7FB1 61676 8 Guc3e 
NOMOVE 7FSS B@4u5 BO35u 
QUIT YFO2 G1236 66536 
RESETR 7?F3A B828u Bv17u 
RETURN 7FBS 81146 68B95% 
SKIPCH 7FBs 618398 Bliwy 
STHRT FFF? 61546 B67BE BEr2u 
TABLE 7ESB 81756 614 
TRAPPR “FSU 6@516 66156 
AINDUP 7FD8 81278 68768 B875u 
WGROLP 7FS86 66728 G1116 
ZFREQ 7E4E BeseBe) = OcSuU 
2LOUP E93 @2476 U2520 


APC 29 


~ | Fig. 2 
. rs een a art 
1@ CLS : POKE_16553.c55 oe 450 DATA 22. FG, 48, 3H. Fe, 40, 
e|20 PRINT "LOADING =H. P. C. - SB ®| 456 OATH 7F. El» C3. FS. ES, 3H 
3@ READ Hs 474 DATA D6. G2, GF. JA. FB, ‘TF. 
@/46 Cxeth+1 2 PRINT @ 56, Cx *| 498 DATA 67> DS. C5. 11, SB» fe» 
SQ IF LEN¢H$2>2 THEN 118 496 OATH 46, 7E. AY. 2a, uC. ED, 
@ (6a Hx=HSC’ LEFTS¢ H¥.1 29-48 ©] saa DATH 7F. EO. 43. 26, 40, G1, 
78 LX=ASCCRIGHT$¢ HE 21 32-40 @| G18 DATA G9, 22, Fr. PFs chs Fes 
@) 36 IF Hk>3 THEN HA=Hx-7 Soy ORTH 4%. Hv» 28 : 
oe 1b to THEN Le fe Soe Set aes Oks oes ee ee 
1G PUKE BxtOx%.HAe16+Le: UN-O2+1:60TU 38) "| sau DATA 28, 1A. 18. Fos JE. FFs 
@ |110 IF HS="ORG" THENREAD B%:0%-G:G0TU 38) 9|/5sq onTA 7F. 32, EA. 40. 32, EB. 
eG TE Aes> ENO" THEN STOP SGG DATA Bi, BS, 7F. CS, ES. Ul» 
@ |ise PRINT e| 570 GATA 23. 56. EB. ES, 13. Is, 
146 PRINT "LOAD COMPLETE" Sou CATA FO. 16. CE. CS. Els Cl» 
e) ioe FORE eee e| 53a DATA 32. FB. 7F.» 3H. FE, 7F» 
166 PURE 1BbES. le? 60 DATA 40, Fi. Fis Fi. OF, CAs 
ey 176 END @| 514 GATH C3. 63, 28, Ci, Ul, El» 
iS REM FLASHING CURSOR & AUTO REPEHT e228 OTA 7E. 2F. Sv. 3A. FA. FF- 
©) 198 DATA ORG.seee2 ©] <3G ORTH i3. OF. 32. FB» YF» Fi; 
299 OATH 21. EA. 70. Ze» 16. 46. 31> Sis 64a DATA 46, SF. El. “4, FO, Fe 
©) 21a oATA GS. CS. CC, WS. ES, CO, IF. FE . 650 OATH 46. C3, Az. id» AF. 32, 
9 (228 DATA 21, GG, G3, Ar. 28, BS, 32. SU 14) G60 DATH Fl. C3, 88, BU, bE, BE, 
S99 0TH 7E, 18.cels 21s Ble JGe- 85% LB S70 OATH BB. BG : 
e| 248 UATA 25, Fz, FC. OU, Av, 23» 15. 2H |e) 63 REN SYMBOL AND VECTOR THBLE 
256 DATA 3B. *fE,s 2B, 7C. Hrs JE. UE? cu 696 CATA ORG. 40342 
e | 260 OATH GB, 3E. G3, 32, 39. FE. 21, BH |e| Fag OATA U6, 43, 43, 41, 52, 33, 
270 DATA Bi,» 3A. .3D. 7E. 222 36s Es El 10 DATH G4, OG. 43. 49. 41, Se. 
e236 UAT CS. ES. 2h, 39, FE. 2B. “UC. HY |@) P20 DATA C3. B4, BS. 44, 45, 45. 
290 DATA 26. GA, 2A. 20, 46. VE. EE. Du >3 DATA 64. 42, 45, 45. SU, E8- 
e| 306 CATA 77. 21. G6, G3, 22, 39, YE» El /@)] 74g GATA 42. 55, SH» SH, BE PE 
316 DATA CS. ES. 83. BG, HS, BO, Hs, UE 7S REM BEEF ROUTINE 
@/226 REM APC-8@ DECODER ROUTINE @| 24 GTA ORG. 32438 
336 DATA URG, J3esl? 7G DATA CS, El» 23. CO. 1C, 2B» 
e| 346 GATA 3E. C3. 32, ABs 41. 32. C4. 41 || 799 DATA 3E. 2c. BE. Ce, 4A, 1E- 
356 DATA Zi. SO. 7F. 22. Av, 41+ 2lse 3H - 79a HOTA. hs. Bor Cl. Sex: SEs 
©) 368 DATA YF. 22, CS, 41. 21. co» fF» UD oa DATA @3. 03. FF. 41, 18, FE. 
374 DATA Ar. 25. 31, Bu, UE, C4, UE, “u @| 218 mre hh. 28> ES, Cis CS 
©'36G DATA iC. iF. 41. 5@. 43, 20, 33. 3b 920 REM BUZZ ROUTINE 
@ (238 DATH 2b. cu, S6. 45. Sd, 53, 45+ 4F | 9) 33a DATA ORG. 32318 : 
406 DATA 4E. 26, 31. 1H» &6 $46 OATH C5, Et, 23. CO. iC. 2B» 
e/tib ° le! 858 DATA 30. 48. EE. 64. 03. FF. 
426 OATG ES. 2h. 24, 46, 22, FL,» °F cr SG OTH iG» FE. 10. 26. FS. Eb» 
e/43@ DATA Fi. 48, 7C, 2F. AS. 28. OC, cH |e] s7a OATA FF. 26. ES. Ci. C3 
444 OATA FG. 46. 22, FS. FF. ci,» bb» bE S54 OTH END 
® ® 
® @| 


®| if * EMGHPLE PROGRAM 
e| 26 “MISSILE SHOT i 
30 FQRITN=30TOL STEP-2:BEEPI =. 1o:NEXT 
e| 46 STOP 
Sa “MISSILE SHOT 2 
©) $88 FORI%=1TOI@OSTEPS: BEEP I“. 36: NEXT 
e| 78 STUP 
SA “TECKEO SOUND 
e| 30 FORT N=1TOL8G:BEEP BMD 126 >.RNOC 1062s NEST 
e| 188 STOr 
i118 “ALARM 
& 126 FORLE=1 7026: FORKX=S@TOSGSTEP-1 s BEEPK 
@|  421G:NEXT KET | 
2 i3@ STOR 
e| id INPUT "HHAT’S YOUR NAME "ahs 
i5S@ IF N¢="JOHN" THEN: BUZ? 255: 
* 46 Stor 
e| iF6 “COUBLE SPACING 
,| 18 CHARS2:PRINT"APC-86 VERSIGN 1":CHARG4 


30 APC 


13u 


ENO 


ELSE IF N$="PETER” THEN: OIE 
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EXPAND YOUR MEMORY AT AN INCREDIBLY LOW PRICE 


16K RAM — $55.00* © 200ns - lation s2000 ex for 16K 
32K RAM— $100.00* e@Available now | | 


MICROLINE 80 
$860.00 


9x 7 Matrix — Includes Sales Tax — no descenders or ascenders — does NOT include interface cable. 


WEST COAST COMPUTER FAIRE 


De Forest Software have a limited number of vacancies for a tour 
to the USA departing Saturday March 29 ex Melbourne, arrriving back 
Tuesday April 6, 1981, Meibourne. 

For further details, ring Peter de Forest on (03) 877 6946 for 
brochure. ‘‘Limited Vacancies”’ 


TAX. 
PAID 


rail ak your POSTAGE IS INCLUDED AT NO CHARGE, HOWEVER WE 
ankcard Number and SUGGEST REGISTRATION OR CERTIFICATION. 

Expiry Date and we 

will immediately 26 STATION STREET, NUNAWADING, VIC. AUSTRALIA 
forward goods. Tel: (03) 877 6946, 878 9276 


weicome here 


NEW!! Z80 soft card $365.00 (run Z8O programs on your APPLE). 


ms 


GAMES 
TRS-80* (MODEL 1) 


Sargon 2 — The ultimate Chess Game for any 


Microcomputer 16K Level 2............. $37.50 
Microchess — Level 1 or 2 TRS“80. Plays an entertaining 
game 3 levels fitsin4K................ $24.00 


Golf & Crossout — New improved version, good graphics. 
You can even design your own championship course. $10 
Santa Paravia — up to 12 can play, become the king of 


a medevil city, levee taxes. ............. $10.00 
Battleground — The stark reality of World War Il comes’ 

alivein this program ..............004 $12.50 
Game Playing with Basic — 3 tapes 1, 2 & 3 based on the 

book of the same name great for learning . . . $12.50 ea. 
Oil Tycoon — 2 players, explore, drill for oil, outprice the 

opposition, force him into bankruptcy. ...... $10.00 
Space Trek IV — population simulation, trade or wage war 

send missions to space, can you survive?...... $10.00 
Checker King — not just an ordinary checker game but a 

fast expert machine language challenge. ...... $27.00 
Flight — Control your own aircraft, very realistic, good 

flying simulation and very challenging. ...... $10.00 


Jet Fighter Pilot — Takes you as close to real combat 
fighting as possible. A brilliantly realistic simulation 


$19.95 
Airmail Pilot — an entertaining game can you get the 
mail through in your 1927 Biplane, watch for 
lightening, windstorms, fuel shortages etc... .. . $10.00 
Night Flight — a new exciting game from Instant 
GOONER. ce pe uk ee Ga bdo wae Be ee $12.50 
Flight Path — from Instant Software. .......... $12.50 
Adventures — what more can be said! The most challengin 
simulation/game/adventure ever Nos. 0 to 10. ea. $16.00 
10P DiSGs «cs. $19.00 
2onDisc..... $32.00 
3o0n Disc. ..... $39.0 
Adventure 10 now available — “Savage Island’’ (Part One) 
Backgammon/Keno — 2 great gambling games trom 
instant software... ........22 2058 eae $10.00 
Mind Warp — A series of great programmes ....... $12.50 
1.0. Test — See howsmart you really are ........ $12.50 


Interactive Fiction -- ‘Little Red Riding Hood” 


DEFOREST SOFTWARE 


Olympic Decathion by Microsoft Disk $29 00; Cassette $29.00; 
Bandito — Your TRS-80 a slot ‘nachine with great 

SOUND OTIOCES cae es SRA hee eS eee Se $12.50 
Star Trek — Acorn a space adventure on your TRS-80. $12.50 
Stock Market — Invest in safe stocks or high risk 

specs. will you take therisk............. $12.50 
Original Adventure — requires 32K & disc from Microsoft. $35 
Monolopy — Play that famous game against the TRS-80. . $10 
Time Trek — with sound, another of the ‘classics’ for 


the TRS-80 real time excellent programme .... $21.00 
Galactic Empire — a space game with a difference, 
many hours enjoyment with thisone........ $16.00 


Cosmic Patrol (with sound) — WARNING! Players of this 
game should be prepared for a state of realism hitherto 


unavailable on theTRS-80............., $19.95 
Light Pen — games and instructional program includes 

game frogs (Light pen notincluded)........ $10.00 
Space Battles — requires 32K 1disc ........... $15.00 
Games 20 — only 75 cents per program on disk .... $15.00 


Pinball — the greatest game that | have ever seen for 
the TRS-80, fast action movable flippers and great 
sound. Machine language, maintains high score Disk. $20 
; . x Tape. $16 
Super Space Invaders with Sound — nothing like the 
normal invaders extra fast. Spray bullets like out 
of a hosepipe, not only does the enemy move side- 


ways but they also advance ...........-.- Disk $20. 


Tape $16 
Space War — A 2 pleyer real time space battle; 5 modes, 
2 SPObOs he So 38 eee eo Se eheae $12.50 
Uitra Trek — A Star Trek theme ina challenging adult 
WORMOW Skea bE eb eee oe ek oe we Ba $19.95 
Lying Chimps with Sound — a very interesting program. . $10 
Chessmate 80 — This programme forced a draw 


WI SaVGOR 2 oo.is cs eis oe ow Ow RR $24 
Othello — An old favorite... .......-2.2.208, $12.50 
Typing Teacher— .......... 00 2 ee eee eee ee $10 
Your Cribbage & Checkers Partner............ $12.50 


Quad — A tic-tac-toe strategy game with a difference . $12.50 
Zossed in Space - machine language, with graphics . $17.50 


Computer adventures into the children’s world Interactive Fiction — ‘‘Local Call for Death’”’ 
of make believe. ............ 0.0000 $17.50 you actually take part inhistory ......... $22.95 
Omni Calculator — Disk — an invaluable air for teachers, Basic Program Assistant — list variables, lines with 
doctors, surveyors, pharmacistsetc. . . . $19.95 keywords etc. — ‘an invaluable aid to programming” 
Dynamic Device Driver — programmable keyboard lock — $19.95 
\/c support — repeat key — forms control etc. $24.00 Disc Editor — list or modify any hyte onadisk. . $45.00 
Mail File from Galactic — 600 names per disk. 
Filemay be splitoverdisks . . . . . . $110.00 
PET 
TREK X with sound (for R&T)... ...00~0:~*ttt $10 Some common basic programmes. ......... $17.50 
Backgammon and Keno ................. $10 Dungeon oF Death vik 6 a a a Se SE aes $10 
mpace TK 2: 0k kk eS ERGs ew wm ke KG $10 AGT ai Ss acini al 6d Gee Bete a de ee $12.50 
Code Breaker with sound .............. $17.40 SU Sg ee ee ee ee $12.50 
APPL E mathematics tutor and change boredom into 
enthusiasm (all programs in this package run 
ere ee $10 in Applesoft basic except whole space which 
a. SW EMOGY s. 6.200 bis, wie Ee ERG, Ba $10 requires Inleger Basic) ............... $25 
W TYCOON. ©... ee eee $12.50 APPLE FUN comprising MIMIC, FLIGHT SIMULATION, 
Sahara WarriOMs «. 2.6. 6%. o-64 Sse Sh we he eo ee $10 COLOURMASTER, STARSHIP ATTACK and 
Space Wars. ...........0.0. 002 ee eee ene $10 TRILOGY (Apple 1! or Ilplus - 32K - 1 Drive - 
Air Flight Simulation... 2... .0....0.04. $12.50 Mimic requires Applesoft in Rom) ........ $25 
Santa Paravia ... . $d oe ees at ho $12.50 Super Shooter — req. 24K integer — includes 
Math Fun — Change an Apple computer into a Space Invaders and Howitzer . . . . . $12.50 
Finance and Investment—disk . . . . . $22.50 Skybombers— 32Kdisk . . . . . . . $22.50 
PaddleFun—disk . . . . . . . . . $25.00 Accounting Assistant— 16K . . . . . . $12.50 
COMPUTER BOOKS Pascal with style a ee ee oe ee eo ee - $8.50 
BOSC BUG sc -e:5 06. ek 4 a oe HESSD EOE HE $11.00 i ‘ila ttalresbei ian nnn i Oils ae 
Mavanced Basic. 6 o-6- 6.5 © here me eS Sw BS we ew $11.00 Fortran 4 Programming ................ $9.00 
Basic from the Groundup..................04 $11.00 ticrocom uter Svst D fei oe en ; 
Basic Work-book .................-.000220% $7.50 wm eee a es — 
: , Microprocessor Data Manual ............. $10.00 
Discovering Basic... .............0000 00008] $8.50 Microprocessor Basics $16.00 
Common Basic Programs ...............2.00.4 $12.50 ¢400Handbook................... $16.00 
Sargon Chess ...............0 000 eee eens $19.00 digital experiments ee ee $11.00 
How to Build a computer controlled Robot ......... $15.00 digital Trouble Shooting eee ee $12.50 
How to profit from your personal computer ......... $11.00 telephone A See ; 
An Introduction to MicroprocessorsO............. $11.75 eS eee ees edt 
a A - . hii aie eee $12.50 sa — u-g ay o ae ee Oe $7.50 
Z80 Programming for Logic Design .............. $12.50 ie ae Cy su poi Se ee tees oeaae 
280 Acsemb! Pr ; cal Pattern recognition ........... $21.50 
ssembly Lanquage Programming. ............ $13.60 Fundamentals of Data Base System $21.00 
Pay Roll & Cost Accounting* (Software to match $99)... $20.00 AOC: Ideas for Desi ie eee: i 
Account Payable & Receivable* (Software to match $99) . $20.00 ene NOR 8 se Fete ee A $18.50 
General Ledger* (Software to match $99) .......... $20.00 Integrity & recovery in Computer Systems ... . $12.50 
6502 Assembly Language Programming............ $13.60 Management of Information Systems ...... . $11.00 
The 6800 Microprocessor ................004. $11.00 File Structure fos On-Line Core Systems ... . . $18.50 
Basic Microprocessors & the 6800 . Sete vet k woe ed $16.00 Data Management for On-Line Core Systems . . . $18.50 
Computer Mathematics ...................0.. $16.00 Digital S.gnal abeebi dnt ass TT ee $27.00 
Consumers guide to personal computing & Microprocessors $11.00 Computer Security Risk Analysis ......... $16.00 
Mini Computers, structure & programming .......... $18.00 Character readers & Pattern recogrfition . . . . . . $17.50 
Fundamentals & Applications of Digitallogic circuits . $13.00 Modern Electronics Security Systems ....... $16.00 
Small Computer systems Handbook .............. $11.50 Printed Circuit Assembly eee eee $6.50 
The first book of Microcomputers ................ $6.50 Basic Mathematics Vol1 ©... 1... $8.50 
Computers in Society ...... a be ys ee a2 gee $9.50 ; VOL2 sete e eee senna. $8.50 
Computers in Action. .............0. 0.044 cee $7.00 Mathematics for Electronics ............. $9.50 
Standard Dictionary of Computers............... $25.00 Human Communication Handbook Voll... . . $12.00 
Programming Programmable calculators. ........... $13.50 ; Vol2..... $12.00 
Cobol withstyle .. 2... 00. ee $9.50 Computer Dynamics ..... . Reet $13.00 
Basic with style. 2... 0. 2 ee ee ee $8.00 Computer Aided Design Techniques. ... . . $32.00 
Fortran with style 2.0... .000-0.000 00. eee eee ee $9.50 Electronic Game Projects .... 7... 2... $6.00 


WE ARE NOW SOLE AUSTRALIAN AGENTS FOR INSTANT SOFTWARE 


TRS-80 Disk and other Mysteries “Pennington” $22.50 


*TRS-80 is a Trademark of the Tandy Corporation. 


DUE TO POOR QUALITY FROM SOME MANUFACTURERS WE ARE ONLY STOCKING SCOTCH BRAND COMPUTER 
CASSETTES “MAGNIFICENT MEDIA” 


The Floppy Doctor. Checks every sector of disk, motor speed 
head positioning, controller functions, status bits, etc. 

$25.00 

New DOS 80 — The latest and greatest from Apparat, variable 

length fields to 4K, mix and match drives on 1 cable. 

18 to 80 track. Security boot and much more . . .$149.50 

New DOS Plus -- A very powerful disk operating system, too 

many features to list. Send SAE for reviews and inform- 

WG 6-6 64th Oe soe See ee 40 track $110.00 

35 track $99.00 

77 track $120.00 


New DOS — A scaled down version of 40 track $55.00 


the above 35 track $49.00 
Editor Assembler Plus. Microsoft -- Very powerful complete 
with de-bugger............. 0000 ee eee $34.00 
Basic Compiler - Create fast Z80 code of your basic programs 
$202.00 

Level 3 Basic - get all the advantages of disk basic plus many 
extra features (disk or cassette). ........... $52.00 
Assembly Language Package -- Complete Marco Assembly by 
NIGIOROTL. 5c 3.4 6 os es Se Oe ws eK $102.00 
Fortran — Microsoft -- Fully compatable with TRS-DOS 
$102.00 


Packer — Comes with 16K, 32K & 48K versions; perhaps the 
best program written in 1979; remove rems & spaces, 
renumber, move and more -- Disk add $5.00. 


$30.00 
Clone 2 — Copies system or data tapes, make backups of your 
valuable programs. .........0.. 00008 eae $18.00 


Print to L. Print — No Printer? Simply use this program to 
change all L. Prints to Prints or vice versa, other features. 
$10.00 
System Savers -- FLEXI and T DISK put your favourite M/L 
tape to disk or make back-ups of system tapes. 
$24.00 
Tape based labelling disassembler — this program assigns labels 
(where appropriate) to the routines in a machine language 
program. The output is almost identical to hand assembled 
sources cose. Because of the use of labels, it is a simple 
matter to make changes without loosing track of jump/ 
load addresses... 2... 2... eee eee ee ee $19.95 
Disk-based labelling disassembler - as above but for disk 
systems. ........ 002 eee eee eee ene ae $24.95 
Utility 1 & 2 — from Instant Software — 2 tapes . 
New DOS 80 -- comes in a brown and gold blocked plastic 
cover with orange pages if your copy is different contact 
us or Apparat. It could be a forgery. 


EDUCATION 
SBT — Structure Basic Translator - write basic in a structured 
PONNIOE. 6 6 ee oo wo Be ee Ke eS disk $23.00 
Teacher — Create your own texts store on data file 
$12.50 


Don’t boot-up 


DEFOREST SOFTWARE 


French/Italian/German — Each on disk, very powerful language 
Ld OORT 6 ee eh ee eee each $23.00 

Assembly Language Instruction Course Audio cassettes, 
program cassette and reference book. Learn Assembly 
Language the easy way. This course guides you smoothly 
through the complexity of Assembly Language without 
OHTICONY. sv od oe ke we ee eK oe SK De $70.00 


HARDWARE . 
Speed up now to 100% faster. Make your machine the fastest 
on the block (new improved model, now 4 speed) : 
$35.00 


Coding Forms. ...........0000 eevee 2 pads $8.50 
Flow Chart Pads..............200., 5 pads $37.50 
Giant Video Display Pads ............. 5 pads $37.50 
House brand 5% Diskettes............. 10 for $40.00 
Blank Computer Cassettes (Scotch). ........ 5 for $12.00 


10 for $19.50 
* Due to poor quality from some manufacturers, we are only 
stocking Scotch brand cassettes “Magnificent Media”. 


Data Separators... .. 0... 0. cc eee ee ee ee $29.95 
Fine Line Graphics ............200e00000: $439.00 
16K memory, 250ns ............2.2.000 00a $57.00 
Installation of above... .........02 000 eae $20.00 
Installation of speed up mod. .............2.. $45.00 
Level 2 Roms — ‘‘New Style’. .............. $175.00 
lnstellation: «+ 4.4.4.5 #40 4445S RRR EEO $25.00 
Doubler — Double density for your machine ...... $250.00 


OTHER PROGRAMS 
Terminal features multi-protocol capability -- auto repeat keys — 
true break key -- soft keys, user programmable - forward 
or reverse scrolling — receive to disk file, printer or buffer. 


$88.00 

The Electric Paintbrush A graphics language, very powerful 

$21.00 

Stimulating Simulations ~. from Personal Software. . . $21.00 

General Mathematics. .............02000% $12.50 

CCA DMS — Data Base rep.32K .......... Disk $95.00 
MU MATH from MICROSOFT — a fantastic mathematic 

PFOGIAM s.5-k eS 84S KR EKA HS Disk $77.00 


Azimuth Finder — Amateur Radio gives beam heading, call 
signs & distance for 100’s of countries screen or printer 


$14.00 
Ham Package -- Instant Software. ............ $10.00 
Music Tutor (Write music on your TRS-80)....... $12.00 
Opera by Acorn — got to be heard to be believed. . . . $16.00 
Engineers -- Beam Analysis Program. .......... $25.00 
Common basic programs (matches Osborne book) . . . $17.50 


without itl 


i The ‘How To’ book of 
_ TRS-80,data recovery 


e 130 page, 8% x 11 softcover 

¢ Actual memory maps, samples 

¢ Detailed recovery instructions 

¢ Recover lost programs, DOS errors 
e Fix parity, gat and hit errors 

e Recover from unreadable directory 
e Fix Electric Pencil file errors 

e Recover lost or killed files 


TRS-80 IS A REGISTERED TRADEMARK OF TANDY CORP. 


JUST $22.50 


Get tt and unveil the many disk mysteries 


for the Model II 


MODEL I! EXTENDED BASIC 


A family of enhancements to the Model II 
BASIC interpreter. Part of the package or- 
iginated with the best of APPARAT, INC’s 
thoughts in implementing NEWDOS BASIC. 
The system is written entirely in machine 
language for SUPER FAST execution. The 
extensions are fully integrated into Model II 
BASIC AND REQUIRE NO user memory, 
and NO user disk space. The package is made 
up of the following five modules, each of 
which may be purchased separately. 


XBASIC — Six single keystroke commands 
to list the first, last, previous, next or current 
program line, or to edit the current line. Ten 
single character abbreviations for frequently 
used commands: AUTO, CLS, DELETE, ED- 
IT, KILL, LIST, MERGE, NEW, LLIST and 
SYSTEM. $25 


XREF — A powerful cross reference facility 
with output to display and/or printer. Trace 
a variable through the code. Determine easily 
if a variable is in use. $40 


XDUMP — Permits the programmer to display 
and/or print the value of any or all program 
variables. Each element of any array is listed 
separately. $40 


XRENUM — An enhanced program line 
numbering facility which allows specification 
of an upper limit of the block of lines to be 
renumbered, supports relocation of renum- 
bered blocks of code, and supports dupli- 
cation of blocks of code.: $40 


XFIND — Permits quick and easy location of 
specified strings or keywords within the 
program text. $30 


SAVE - on the purchase of the entire package 
FBZHO 


SKRUNCH 


A SUPER FAST TRSDOS UTILITY. Com- 
presses your BASIC programs to an absol- 
ute minimum. Typically saves 30-40% space, 
even for programs without REM statements! 
Also results in 7-10% improvement in exec- 
ution speed. $35 


FRIEND 
FOUR NEW TRSDOS COMMANDS! 


SHOW — A much better multi-disk directory 
display. Let’s you see only those files you 
want, and includes date of last update. 
MOVE — A much better file copying com- 
mand. Copy/Move whole groups of files, 
renaming them at the same time if desired, 
m with just one command! 
|} ERASE — Better than KILL. Better than 
PURGE. 
PRINT — Print BASIC programs from disk, 
whether saved in ASCII or compressed. 
All 4 DOS commands allow fast processing 
of one, or complete groups of files, based on 
generic naming and wild card specifications. 
Enhanced functions too numerous to fully 
describe here. 


EXAMPLES: 
SHOW PAY*/BAS:* 
Directory display of all‘/BAS’ files on 
all diskettes which begin with ‘PAY’. 
MOVE PAY*/BAS 1 TO /OLD:3 


Save current versions of payroll pro- 
grams to drive 3, changing extension to ‘/OLD’. 
MOVE OLD*/* TO NEW /:1 

Copy all files on drive 0 which begins 
with ‘OLD’, regardless to extension to drive 1 
changing the first three letters of the file 
name to ‘NEW’, but retaining the same file 
extension. Save time! 

Reduce frustration! 


Eliminate ERROR 33! $75 


SPOOLER - Model | and Model I! 


Our workhorse! This package, available for 
Model |, in the TRSDOS/NEWDOS or NEW- 
DOS 80 versions, or for the Model II, greatly 
enhances system performance when running 
typical business applications. Many appli- 
cations have been benchmarked to run nearly 
TWICE AS FAST with the SPOOLER ins- 
talled. Installs in minutes, and no changes 
are required to your programs. Preferred 
Model II versions require NO user memory. 
Optional features for the Model I! version 
only. Serial printer support, and DISK 
SPOOLING support is particularly recom- 
mended for word processing applications. 
$100 
$50 
$50 


SERIAL PRINTER OPTION 
DISK SPOOLING OPTION 


ITOH 


A helping hand when converting BASIC pro- 
grams from the Model | to the Model II 
Automatically adjust PRINT @, and PRINT 
USING to compensate for differences in the 
language. Advises you where adjustments are 
necessary for PEEK, POKE etc. $25 


HOSTII/TERMII 


Allows ‘remote control’ of a Model I! from 
another Model II, or any ASCII terminal. If 
terminal is a Model II, accurate screen pos- 
itioning (PRINT @) is fully supported. Re- 
quires NO user memory! This system is des- 
igned to provide software support to our 
customer locations without ever leaving the 
office. $50 


SAVE 


Retrieve the resident BASIC program follow- 
ing an accidental re-boot, an accidental 
SYSTEM or a system crash. DON’T BE 
WITHOUT THIS ONE. YOU NEVER KNOW 
WHEN YOU WILL NEED IT! $35 


DOSFIX 


A collection of patches to TRSDOS and 
BASIC to enhance their usability and fun- 
ction. Includes our well known BREAK7E 
patches to keep the break key from being 
used accidentally. FREE WITH ANY MODEL 
IF SOFTWARE PURCHASE. 


THE FINE PRINT 


TRS-80 is a trademark of the Radio Shack 
division of Tandy Corporation. 

NEWDOS and NEWDOS/80 are trademarks of 
Apparat, Inc. 


T DAM 

Automatically read and write your 
random access files. Never worry about 
fielding again 


DIVERGE 
Compare 2 BASIC program files 
showing differences 


REBUILD 
Reorganise programs for adding 
code and rearranging 


SIFTER 
12 high speed sorts inc. demo 
DYOCIBING «9-4 45% by ee A Oe A $35 _ 


SHRINK 
Make every byte count! 
Reduce by 25-40% 


SUPERSEDE 
Write programs in shorthand, 
change variable names 


MINGLE 2 
Merge up to 14 files 


AIDS 3 

Marvellous data base c/w machine 
code assisted sorts and print. 
sub system 


CALCULATION SUB SYSTEM 3 

Fields in any order. 
Columnar totals and subtotals, 
computations using field values 
and constants 


TRS-80* (Model I!) 


CPM version 2.1............004% $210 
MAGIC WAND 
“The Ultimate Word Processor” 
(requires CPM) 
C Basic 2 


The following business programs are 
fully interactive and written for Aust- 
ralian conditions. 


Creditors 

Debtors and Invoicing 

Order Entry/Invoicing/Stock 
Control 

General Ledger 

Payroll 

Direct Mail 


DSM 

Disk Sort Merge for random files — 
superfast sort 
Basic Cross Reference Utility — Seek 
and find instructions for variables, line 
numbers, strings, keywords 


GSF 

The standard against which other sorts 
are compared; machine language, multi- 
key, USR peeks and pokes 


indie for TRS-80* computer eliminates disk read errors 


De Forest Softwa is marketing a simple 
plug-in ee sor “TRS-80° computers that 
corrects a design defficiency in the disk 
controller circuit. 

The problem, which causes disk read errors, 
has been traced to Tandy’s reliance on a cir- 
Cuit internal to the FD1771 controller IC to 
perform the function of separating clock and 
data pulses. 

As explained in the Backgrounder, use of 
the internal chip circuit for reliable data- 
clock separation is a design shortcut which 
the manufacturer of the controller |C warns 
against. 

The De Forest solution, a PC card adaptor 
called the DATA SEPARATOR, eliminates 
the problem by substituting an explicit data 
separator circuit — one which has been used 
reliably in disk controllers since 1977 — for 
the internal IC separator circuit. 

The DATA SEPARATOR is installed without 
modifying the host system. The user merely 
removes the FD1771 IC from the host con- 
troller, installs the IC in the DIP socket on 
the SEPARATOR card, and plugs the adapt- 
or into the vacated socket of the host con- 
troller and then joins two wires. 

We caution that opening the Expansion 
Interface of the TRS-80* computer which is 
required to install the SEPARATOR, may 
void the computer's limited 90 day warranty. 
The SEPARATOR which sells for $29.95, 
may be purchased from De Forest dealers 
Or ordered direct from De Forest Software. 
Payment for mail orders may be made by 


cheque or money order or charegd to a 
BANKCARD account. 


Adaptor fixes TRS-80* computer disk con- 
troller. 


CRC ERROR! TRACK LOCKED 
OUT! 


Technical Staff 
Percom Data Company 


This problem started while we were studying 
an annoying problem with the TRS-80* 
computer. Disk drives sold by Percom are 
realigned and tested before shipment. We 
noticed, however, that some disk drives 
would pass the Percom inspection but just 
would not work reliably on the inner tracks 
with a TRS-80* computer. These drives were 
within the manufacturer's specifications, and 
would function perfectly on other disk sys- 
tems Percom manufactures — ‘‘perfectly’’ 
here meaning more than 50 million bytes read 
without error! 


The disk read data separation arrangement in 
the TRS-80* computer Expansion Interface 
uses an internal data separator of the FD1771 
disk formatter/ controller IC. Use of the 
FD1771 internal data separator is not reco- 
mmended by Western Digital, the 1C manu- 
facturer. The following note appears on page 
17 of the FD1771 data sheet: 

Internal data separation may work for some 
applications. However for applications re- 
quiring high data recovery reliability, WDC 
recommends external data separation be used. 


We suspected the data separator because the 
problem was most severe on disk inner 
tracks where storage density is highest and 
data separation is most critical. 


To prove our point, a technician breadboard- 
ed a standard Percom data separator circuit, 
and configured it to plug directly into the 
FD1771 IC socket of the TRS-80* computer 
controller. 


When connected to the TRS-80* computer, 
a troublesome drive functioned perfectly! 
We ran a BACKUP utility many times and 
never got a track lockout. Before we added 
the external data separator circuit to the 
computer, this same drive would always lock 
Out tracks, and would have difficulty read- 
ing from the inner (higher number) tracks. 

The data separator circuit fixes the 
mini-disk controller of the TRS-80* com- 
puter. The type of drives bwWing used is 
irrelevant; the circuit eliminates disk read 
errors resulting from the inability of the 
Tandy controller design to reliably separate 
clock and data signals when reading high den- 
sity inner tracks. 


This Australian Unit has been designed and produced for 
_deForest Software ONLY Y $29. 95 


DOES NOT AFFECT WARRANTY! 


NOTA KIT! 384 x 194 RESOLUTION 


UPPER AND LOWER CASE WITH 
DESCENDERS 


SUPER 80 is a unique Australian invented and manu- 


factured hardware/software package which will integrate high speed, 
high resolution graphics into any level I! TRS-80 system. The install- 
ation of SUPER 80 will not affect normal operation of the TRS-80. 
A fully buffered expansion and edge connector is provided so that 
other peripherals may be used. Fully protected against over voltage. 


“Comes complete withSOFTWARE 
ony $43900 


INSTALLS IN SECONDS! 


POWER SUPPLY 
MANUAL 
CABLE 


Also available at City Personal Computers, 75 Castlereigh St., Sydney 


If you 
just bought 
another 
printer, 
boy are 
you gonna 
be sorry. 


The Epson MX-80. It’s not just another worked- 
over rehash of last year’s model. It’s a top-of-the- 
line printer. It’s new. From the ground up. And 
it’s the most revolutionary printer to hit the market 
since Epson invented small printers for the 1964 OI- 
ympics in Tokyo. Don’t take our word for it, though. 
Compare. There simply isn’t a better value in a 
printer. Period. 

But here’s the fact that’s going to stand the printer 
world on its ear. The MX-80 sports the world’s first 
disposable print head. After it’s printed about 60 
million characters, you can throw it away. Because a 
new one costs less than $40, and the only tool you 
need to change it is attached to the end of your arm. 

Now that’s revolutionary, 
but that’s only the beginning. 
The MxX-80 also prints bi- 
directionally at 80 CPS with a 
logical seeking function to min- 
imise print head travel time 


The world’s first disposable print 
head. It has a life expectancy of 
over 50 million characters, yet it’s 
so simple, you can change it with 
one hand. And it costs less than 
$40. 


(We apologise for shipping delays, 
however stocks have now arrived.) 


*For TRS-80 includes Sales Tax — IEEE, RS232 or APPLE 2 interfaces are slightly higher. 


don’t be 
fooled! 
*lowercase 

has 
descenders 
*Interface 
cable Is 

not an extra 
*readable 
9x9 matrix 


*90 day 
warranty 


and maximise throughput. It prints 96 ASCII, 64 
graphic and eight international characters in a tack- 
sharp 9 x 9 matrix. And it provides a user-defined 
choice of 40, 80, 66 or 132 columns and multiple 
type fonts. 

The MX-80 is the first of a revolutionary series 
of Epson MX Printers. These employ the most ad- 
vanced automatic assembly and machining techniques 
in existence to produce a printer that is incredibly 
versatile, remarkably reliable and extraordinarily 
inexpensive. It’s a printer that could only come from 
the world’s largest manufacturer of print mech- 
anisms: Epson. 

If it sounds like we’re proud of the MX-80, we 
are. Not only does it do things 
some of the world’s most ex- 
pensive printers can’t do, it'll 


do them for you for less than ' 
$950. That's right. Under 
$950*. 


And if that-‘isn’t revolution- 
ary, we don’t know what is. 


DEFOREST 
SOFTWARE 


26 Station Street, Nunawading 
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THE COMPLETE 


PASCAL 


BY SUE EISENBACH AND CHRIS SADLER 
CHAPTER6 DATASTRUCTURES 2-RECORDS ANDFILES 


Computer programmers, the languages they program in and sometimes even the computers on which 
these programs run tend to be biased either towards number-crunching (immense calculations) or 
data-processing (huge quantities of information). This chapter is intended to provide an introduction 
to PASCAL ’s approach to the second of these. 


Computers have traditionally been 
employed in the fields of scientific 
research and business data-processing. 
The different requirements of these 
two types of user have produced oppos- 
ing specialisms amongst computer pro- 
fessionals — conflicting designs and 
configurations of both hardware and 
software; and most importantly from 
our point of view, programming lan- 
guages with differing facilities and 
capabilities. Scientific languages tend 
to standardize on_ specialized and 
sophisticated mathematical functions 
and to leave non-standard and bulk- 
data handling features which are 
consequently provided (with greater or 
lesser degrees of effectiveness) by the 
individual implementors of the langu- 
age. This reflects perfectly reasonably 
the general format of a mathematical 
problem where complex operations 
need to be performed on a relatively 
restricted amount of data. 

Commercial languages, however, 
often don’t provide sophisticated or 
even convenient mathematical functions 
since their processing tends to consist of 
more routine operations but with much 
larger quantities of data. This is not to 
suggest that a good sorting algorithm 
is not every bit as complex as, say, a 
Fourier transform module, but while 
the latter operates on the supplied 
data to produce completely different 
data, the former works with data, re- 
ordering it but not actually changing 
any values. In any case, in a typical 
data-processing problem, the quantity 
of supplied data is generally so large 
that no more than a small fraction can 
fit into the machine at one time — the 
organizational problems associated with 
containing this data in machine-readable 
form and of making it available to the 
program in a controlled and ordered 
manner dominate these commercial 
languages. 

While the data is being manipulated 
within the machine it is grouped 
together in structures called records. 
Loosely, a record is a number of data 
items, usually of different types, which 
need to be associated in some way, 
probably because they all pertain to a 
single entity. A second record would 
contain the corresponding information, 
in the same format, pertaining to 
another entity, and so on. An entry in 


a telephone directory, i.e. Name, 
Address . . . Telephone No. is a simple 
example of a record. 

A file is a data structure external to 
the program and consists of a collection 
of records. The characteristics of any 
particular file will depend not only on 
the size and number of the records it 
is to contain, but also on the medium 
on which the file is being stored. Mag- 
netic tape files are called sequential 
files because records are stored in 
sequence and can only be accessed as 
such — le. start at the beginning and 
deal with each record in turn. Clearly, 
quite a bit of complicated program- 
ming has to be done at system level to 


ARRAY 


RECORD 


field list 


eel: 


Record and Field List 


control the tape drive and the motion 
of data through the read/write tape 
heads. This software can usually be 
initiated by fairly simple calls embed- 
ded in the programming language. 
Wirth’s standard PASCAL provides a set 
of these sequential file-handling facili- 
ties. 

PASCAL, however, was designed 
when discs were considered as a sort of 
extension of the memory in _ large 
computer systems and were too expen- 
sive and bulky to be a suitable medium 
of data file storage. The advent of small 
hard disc packs and reliable diskettes 
has put this medium within reach of 
smaller system users making it reasona- 


END 
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PROGRAM FIRSTILL $ 


1 

ad 2 TYPE STOCK=RECORD @ ® 
3 NUMBER: INTEGER 3; 

e| * NAME: PACKED ARRAY C1..24] OF CHAR 3 
5 PRICE:REAL 3 * 
& GUANTITY: INTEGER 3$ 
7 VAT!0..100 

@ g END 3) (#RECORD+) & 
9 VAR ANSWERICHAR ; 
10 ITEM:ARRAYCO..4]0F STOCK 

@) i: ACCEPTABLE:SET OF “A’..°Z° 3 & 
LZ I:-1..4 3$ 
13 PROCEDURE SETUP ; 

@/ 14 BEGIN a 
15 ITEMCO].NAME := “DAISY BELL FRINTER ae 
16 ITEMC1].NAME := “MICRO DOT MATRIX FRINTER’ 3 

@| 17 ITEMC2].NAME := “NCR PAPER ots e 
18 ITEMC2].NAME t= “CONSTAT PAPER : 
19 ITEMC4].NAME := “CARBON RIBBON ; 
20 FOR I := 0 TO 4 Da 

e 21 BEGIN . 
22 ITEMCI].NUMBER := I,3 
23 ITEMLI].QUANTITY := © 3 

@| 2,4 PAGE (QUTPUT) ; & 
25 WRITELN (“PLEASE TYPE IN TODAY’*S PRICE FOR “©, ITEMCI].NAME) : 
26 WRITE( “FOLLOWED BY THE VAT RATE AS A % --2°) 3 

@| 27 READ (ITEMCII.PRICE) 3 READLN (ITEMCIJ.VAT) B 
28 END 
29 END $ (#SETUP#) 
30 PROCEDURE HELP 3 

e 31 BEGIN ® 
32 PAGE (QUTPUT) ; 

e| 2 WRITELN( “TYPE H TO SEE THIS DISPLAY.”) 3 @ 
34 WRITELN(“ T TO PRODUCE A TILL SLIP.~) 3 
a5 WRITELN( * S TO PRODUCE A SUMMARY OF THE DAY“°S TRANSACTIONS. °) 3 
35 WRITELN( * E TO EXIT FROM THIS PROGRAM.*) 3 

@| 36 WRITELN $3 WRITELN ; se 
37 WRITE (“WHEN PRODUCING A TILL SLIP TYPE EACH ITEM NUMBER FINISHING “> $ 
28 WRITELN(“WITH A -1.”°) 3 

@| 3° WRITE (“HIT THE RETURN KEY TO CONTINUE.) 3 J 
40 READLN 
41 END $3 (#HELP#) 

@| 42 PROCEDURE TILLSLIP ; 2 
42 VAR TOTAL, TAX:REAL ; 
44 NUM: INTEGER 3 
45 BEGIN 

e 46 TOTAL := 03 Re 
47 TAX t= 0 3 
4g READLN (NUM) 3 e 

@! a9. WHILE (NUM > -1) AND (NUM < 5) no 
50 BEGIN 
51 WRITELN (ITEMCNUMJ.NAME, - “, ITEMCONUMI.LPRICE) $ 

@) 52 ITEMCNUM]. QUANTITY: =ITEMCNUM).GQUANTITY+1. 3 & 
52 TOTAL! =TOTAL+ITEMCNUMI.PRICE 3 
54 TAX! =TAX+0.01%ITEMCENLIM].VAT 3 

@i ss READLN (NUM) B 
56 END 3 
57 WRITELN 3 

@| =¢ WRITELN( “VAT “, TAX) 3 2 
59 WRITELN( “TOTAL *, TOTAL+TAX) 3 
60 READLN 

@| 61 END 3(*TILLSLIP#) e 
42 
63 PROCEDURE SUMMARY: 

@ | °4 CONST TAB = - vos a 
65 VAR TOTAL, TAX:REAL ; 
6&4 BEGIN 
67 TOTAL: =0 3 

@ | es TAX t= 03 & 
49 PAGE (QUTPUT) 3 
70 WRITELN( “NAME aTY SOLD AMCILINT’) 3 

@| 71 FOR It=0 To 4 DO & 
ra BEGIN 
73 WRITELN(ITEMCI].NAME, TAB, ITEMCII.GUANTITY, TAB, 

@| 74 ITEMCI].QUANTITY#ITEMCII].PRICE) $3 @ 
75 TAX t= TAX + O.O1#ITEMCI1.VAT#ITEMCII. QUANTITY $ 
76 TOTAL := TOTAL + ITEMCII].PRICE # ITEMCI].QUANTITY : 
77 END 3; 

e 73 WRITELN 3 WRITELN 3 . 
79 WRITELN (“SUBTOTAL = “, TOTAL) : 

e|* WRITELN (“VAT = “, TAX) $ 
81 WRITELN( “TOTAL = “~, TOTAL + TAX) 3 2 
a2 READLN 
S2 END 3 (#SUMMARY#) 

@/ 24) BEGIN (#MAIN PROGRAM#) @ 
as SETUP 3 
BA ACCEPTABLE := [C°E*, “H, “S", “Trl? 

@| 27 WRITELN (“TYPE H FOR HELP.) 3 e 
22 REPEAT 
ay REALILN (ANSWER) 3 

@| % IF NOT (ANSWER IN ACCEPTABLE) THEN ANSWER t= “Ho 3 e 
v1 CASE ANSWER CF 
92 “EY : WRITELN (° GOOD BYE“) $ 
2% “HY = HELP 3 

@ 34 “S" 2 SUMMARY 3; e 
5, oT TILESLIP 
DE END (#C ASE) 

e| UNTIL ANEWER = ~E° & 
98 END . 


ble to discuss direct-access files. As with 
the mag. tape drive, special system soft- 
ware is required to direct the read/ 
write heads to the correct track and 
sector on the disc and to control the 
flow of data to and from this location. 
However, all the data is spread over the 
surface of the disc and is consequently 
all equally accessible directly — hence 
the name. 

Although this software is utilized at 
operating system level (in the form of 
file-handling and/or editing utilities), 
high-level language calls are seldom 
available to the programmer so that 
most disc data-files tend to be sequen- 
tial. UCSD PASCAL is an exception to 
this general rule and we feel that direct- 
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access facilities are sufficiently impor- 
tant to be incorporated in any future 
standard PASCAL. It is with a small 
degree of reluctance therefore that we 
abandon Wirth PASCAL in Section 4 to 
describe the UCSD file-handling facili- 
ties. 


Records 


The record was defined in the previous 
section as a grouping of associated data 
items. These data items are known as 
the fields of the record. There is no 
restriction on the type which each field 
may be so that the structure is distinct 
from the array where all elements must 
be of the same type. In addition, fields 


are not directly accessible via comput- 
able indices like array elements, but 
must be referenced by a fixed field 
identifier. 

The record is declared in a TYPE 
statement in which is stipulated both 
the field identifiers and their corres- 
ponding types. The syntax diagram in 
Box 1 shows the reserved words requir- 
ed for this declaration, together with 
the format for the field list. Note that 
a field within a record could be another 
record, or even an array. 

As an example of the uses of records 
in a_ program look at _ program 
FIRSTILL in Box 2. The program repre- 
sents a cash register for a small shop 
which sells printers and stationery for 
microcomputers. A tally is kept of every 
sale so that, in addition to producing a 
slip for the customer, a daily summary 
can be output at closing time. The 
record type STOCK is declared in lines 
2 to 8 with the field list laid out in lines 
3 to 7. The field NAME is declared as 
a PACKED ARRAY. Packing is a device 
whereby elements of a particular data 
type. are packed into the smallest 
amount of memory needed — e.g. a bit 
for a BOOLEAN, a byte for a CHAR 
etc. Numerical array elements frequent- 
ly incur too large an overhead to make 
packing worthwhile but BOOLEANs 
and CHARs usually repay packing with 
substantial space saving. The PACKED 
ARRAY OF CHAR is formally defined 
asa string which we shall be dealing 
with at some length in the next chapter. 

In line 10, array ITEM is declared as 
of type STOCK which implies that 5 
records will be set aside in memory for 
this data structure. Each record can be 
referenced by a different value of the 
array index. Line 15 and the rest of 
procedure SET UP provide illustrations 
of the method by which individual 
fields within a record are referenced. 
The record name and the field name, 
separated by a. , must both be supplied, 
and lines 15 to 19 refer to the same 
field in different records. Lines 22 and 
23 on the other hand refer to different 
fields in the same record (selected by I). 
The instruction in line 24 clears the 
screen (in UCSD PASCAL). 

Procedure HELP reveals the menu- 
driven nature of the program, since 
each of the different functions may be 
selected by inputting a single character 
at the keyboard. The most important 
key to remember, especially for an 
inexperienced teller, is ‘H’ which exe- 
cutes HELP itself. The two procedures 
TILLSLIP and SUMMARY show how 
record fields can be manipulated like 
ordinary variables although the referen- 
cing scheme makes them appear a bit 
long-winded. This can be avoided by 
means of the WITH statement whose 
syntax diagram is given in Box 3. When 
the record identifier is given in the 
“variable” box, all identifiers appearing 
in the “statement” are checked by the 
compiler against the field names pertain- 
ing to that record as well as the normal 
declared identifiers appropriate to that 
procedure. The record name is thus 
taken as a default for the duration of 
the statement. This is illustrated in the 
new version of SUMMARY appearing 
in Box 4, lines 10 to 15. 


Exercise: Re-write FIRSTILL using 
WITH statements where appropriate. 


THE TROUBLE WITH TRS-80's 


We like Tandy's home computer. 
16K Level Il stage it is a reliable 
and reasonably priced entry to the 
magic of computers. But that cassette! 

Tandy's optional ''glitch kit! 
makes it fairly dependable, but it's 
still slow, requires knob twiddling 
for volume level and button pushing 
for operation. 

Enough to put you off computers! 


TANDY's ANSWER 


Of course Tandy has an answer, 
add an expansion interface and a 
small disk drive. 

Ask the price! 


ASP's ANSWER 


Now we have 
its not just a 
a non-standard 
little cheaper 
attendant risk 


At 


an alternative, and 
matter of offering 
small disk drive a 
than Tandy with the 
if it doesn't work. 


STRINGY FLOPPY 


The solution is a compact high- 
speed tape transport system entirely 
under the control of the computer - 
designed for data - 
not music. Its called 
STRINGY FLOPPY 

There are no controls ¥ 
to fiddle with, just one f 
light indicating the 
drive is in operation 
and another indicating 
that data is being 
written onto wafer. It simply plugs 
into the back of the Tandy keyboard 
unit. Or with an optional adaptor 
into the System 80 Computer sold 
by Dick Smith. 


WAFERS - NOT CASSETTES 


Unlike the cassette recorder that 
comes with the Tandy, STRINGY FLOPPY 
uses specially designed 'wafers'' 
about the size of a credit card and 
5 mm. thick. These contain an 
endless loop of special chromium 
dioxide tape ranging in length from 
1.6 to 23 metres. Their low mass 
means they operate reliably at high 
speed. 

Removal of a reflective label 
protects them against accidental 
overwriting of data. 

Their special tape and the 
digital recording method used 
means you don't lose data. 


RELIABLE RECORDING 


STRINGY FLOPPY uses a true 
digital recording technique like 
floppy disks, not fluctuating 
audio tone. The result - 
RELIABILITY. 

The system was designed for 
computers - not designed for 
music. 


SYSTEM | 


NO MAINTENANCE DRIVE UNIT 


The STRINGY FLOPPY wafer has 
the pressure roller for the capstan 
built in. So the capstan and the 
record head can be fixed in the 
die-cast aluminium drive. No 
adjustments required. The wafer 
just slides into the drive and 
"clicks'' home. No other mechanical 
motion is required. And because 
wafers contain endless loops, the 
tape always travels in the same 
direction. 

There is no need for a rewind 
capability. 

Simplicity means reliability. 


INTEGRATION TO THE TANDY 


All this would be useless if 
STRINGY FLOPPY wasn't easy to use. 
So its operating system is ina. 
permanent memory chip (ROM) in the 
drive unit. ' 
Using the 


command * 
it becomes 
part of 

the Tandy. 


14K of ROM 
instead of 
just 12K. g 
Commands # 
al low 
you to 
initialize wafers 
(prove their integrity), 
load or save up to 99 files ona 
wafer on up to 8 STRINGY FLOPPY 
drives connected to the Tandy. 
Programs can be in BASIC or 
machine language. Loading the 1K 
DATA 1/0 program from wafer adds 
additional commands to store and 
retrieve data rather than programs. 


SPECIAL BONUS 


Those who know their Tandy's 
well will know all about the dreaded 
keybounce! Well, STRINGY FLOPPY's 
ROM contains a keybounce fix routine. 
Nice? 


RECORDING SPEED DENSITY 


STRINGY FLOPPY records at 7200 © 
baud (700 characters per second), 
14 times faster than Tandy's cassette 
on a Level II machine. Tape speed is 
25 cms. per second, so you can 
calculate access and loading times. 
If you "hot~-up'' your Tandy by 
increasing the clock speed you wil] 


NOT DESIGNED 
FOR MUSIC 


get a proportionate increase in data 

density and therefore wafer capacity. 
Even on a standard Tandy you can 

fit up to 64K on a 23 metre wafer. 


PROGRAMMING 


With STRINGY FLOPPY you can create 
programs which chain under the control 
of your computer. The pressure on 
memory diminishes. ASP has programs 
such as its word processor and a data 
base manager which can demonstrate 
the possibilities for clever creative 
programming. 


THE CATCH 


OK, the bottom line. STRINGY FLOPPY 
complete with operating system, plug. | 
pack power supply, DATA -1/0 program 
is $350.00 inctuding Sales Tax. Add 
$5.00 for freight within Australia. 

And we'll include a box of 10 
mixed length wafers (normally $35.00) 
and a 2 for 1 bus extender (normally 
$20.00) in the price. 

And a six month limited warranty. 

And a year's subscription to our 
STRINGY FLOPPY Newsletter. 


AND if you're not satisfied with 
STRINGY FLOPPY, return it within two 
weeks for a courteous refund (this 
applies only 


to non-Bankcard purchases). 


So maybe there wasn't a catch. 


BANKCARD orders must quote 
fel Bankcard number, 
Expiry Date and be signed. 


Versions for other computers are 
available. 


_AS 


MICROCOMPUTERS 


797 DANDENONG ROAD, 
EAST MALVERN 3145. 
VICTORIA AUSTRALIA. 


Telephone: 2118855 2118344 


S 
Files ‘‘Normal”’ Reference 9 


One of the essential characteristics of a 


file is that it is external to the program ele os eo ane 
as a whole. Only a small portion of the eS 


data is accessible to the program at any 
one time and although it is possible to 
have a file of arrays, say, we will assume 
that a typical file contains records. In 
this section we are discussing the 
sequential files of Wirth PASCAL as 
defined in the introduction so that the 
file will consist of a sequence of 
records in strict order. When a file is 
accessed therefore, the “unit”’ in which 
the program must deal with the data is 
one record. 

A file is declared by means of a type 
statement as shown in the syntax dlia- 
gram of Box 1. In our case, the “‘type” Field Referencing 
referred to in the declaration will be a 
record which will have been declared 


with Statement 


variable 


. ° . PROCEDURE SLIMMARY 35 
earlier on in the declaration part. When Sane ae 
the compiler encounters the file declara- Beeb 2p ake REAL) 
. e ° ° * (a 
tion, apart from noting the file identi- , TOTAL t= 0 3 
fier and establishing the correct I/O TAX t= 0 5 
h ] d . h l hi h th FAGE (QUTFUT) 3 3 
channel (and peripheral) on whic e 2 WRITELN (“NAME BUANTITY SOLD AMCILINT?) 3 
file is to be found, it creates a struc- Fon ee OS BO 
ture in memory of exactly the type (i.e. Deen eet 
record) previously defined. This struc- , WRITELN(NAME, TAB, GUANTITY, TAB, GUANTITY#PRICE) 3 
& 5 g 3 TAX == TAX + O.O1L#VATHOUANTITY 3 

ture is known as the file window or TOTAL t= TOTAL + QUANTITY*PRICE 
buffer variable and is referenced as END 3 (#WITH#) 

: fo, WRITELN 3 WRITELN 3 
follows; ee aa WRITELN (“SUBTOTAL = “, TOTAL) 3 

file identifier 4 WRITELN (“VAT = © 1 TAX) $ 
or file identifier a: 3 WRITELN (“TOTAL = “, TOTAL + TAX) 3 

% 2¢ READLN 

depending on the character set suppor- 21 END 3 (#SUMMARY#) 


ted by your terminal. 


During execution of the ensuing see Siete ©|®@ 
° ° ey UN's = @ 
program, any reference to “file iden- me TYPE STOCK = RECORD 
tifier tT’ will involve those memory 4 Oe ee ek @ 
locations set aside for that structure. : PRICE-1 REAL =: eee 
[It is the job of the programmer, how- Z TOTOUANTITY + INTEGER 3 ® 
td BUANTITYSOLDO =: INTEGER 3 
ever, to ensure that the contents of 9 REGRDERLEVEL + INTEGER $ 
these locations are in fact the fields of a RAS an at & 
the record under consideration. For io SUR ANSWERS OCDE EMBR GEO ea 
this purpose there are a number of /ile- . ie Ghee eee 8 
handling operators available. These 15 ACCEPTABLE : SET OF “A*..°Z° 3 
enable the programmer to manipulate “= BOUSAES SOY enn e 
‘ ; pues 17 TOTNIM : INTEGER 3; ® 
the peripheral on which the file is stored 1g 
and so access the data needed. AOR an ° 
The file-handling operators are 21 BEGIN ree 
RESET (filename) — starts at the begin- is SF EE IS “RECORDS. DATA*) 3 € 
ning of the file and puts the first record 24 WHILE NOT EOF (STOCKFILE) DO 
- : : : 25 BEGIN 
into the buffer variable. This is used 5a Rice ae ie . 
when reading data out of a file. 27 Lite 1413 
REWRITE (filename) — starts at the a Be Oot toyocer Ite | 
beginning of a new file or out-of-date 30 CLOSE (STOCKFILE, LOCK) ; @ 
file for the purpose of writing to the SS Re ee 
file. Nothing is actually written on the 33 i & 
. = 34 PROCEDURE INITIALISE 35 
file at this stage, however. De ye oe. awa é Gee 
GET (filename) — advances the file 3é BEGIN : poe oe oe & 
window by one record and assigns the es ee ea ee 
data contained therein to the buffer 39 REWRITE (STOCKFILE, “RECORDS. DATA”) 3 S 
] 40 FoR I t= 1 70 TOTNUM oO 
variable. : 41 WITH STOCEFILE” DO 
PUT (filename) — writes contents of 42 BEGIN e 
buffer variable out to file — i.e. creates S ee ee 
a new record at the end of the file. 45 READLN (NAME) ; @ 
it] j i 46 WRITE (“PRICE -->") 3 
In addition to the file window, another a7 READILN (PRICE) 3 
file control element is maintained in 4a nied aha cis Oa eae e 
° ° . ° g . i] Til 3 
the machine while file operations occur. ae ee eee 
This is a BOOLEAN variable called 5 Se ee es ee 
Z “ z 52 : -ECIRED : 
EOF (for end-of-file) which 1S FALSE bari} WRITE (°VAT @A=S A % --2") 3 ad 
as long as there are unaccessed records 4 Sty ees oe Mea 
1 ; = Maye t STOCK : 
still in the file and becomes TRUE when = ee pa e 
the last record is reached. When a 57 oo Leer 
: : 53 SETU 
RESET is executed, EOF is made So END : (#INITIALISEX) @ 
FALSE unless no file can be found. 60 
. ° a, im] IR ‘ 3 
When a REWRITE is executed EOF is eae oe e 
made TRUE. A GET won’t work unless 43 BEGIN BES oo NOR ae Mees 
° tb ‘ ‘ 447 OIEE » “RECORDS. is 3 
EOF is FALSE beforehand and a PUT ee et ae ee a 
won’t work unless EOF is TRUE before- bb BEGIN 
: siete : 47 STOCKFILE* := ITEMCII 3 
hand. This makes it impossible to be PUT (STOCKFILE) e 
1 5 ; &g END 3 
Hs a record into the middle of a ab SUOSETSTOPKPILES Lock) 
He. 71 END (#WRITEFILE*) 


PROGRAM BIGTILL in Box 5 is an 
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FROCEDURE TILLESLIF 3; 
VAR TCUTAL, TAX = REAL 3 
NUM : INTEGER 3 
BEGIN 
TOTAL t= 0 3. 
TAX $= 0 3 
READLN (NUM) 3 
WHILE (NUM > ©) AND (NUM <= TOTNUM) pc 
WITH ITEMCNUM] DO 
BEGIN 
WRITELN(NAME, “, PRICE) $3 
TOTOUANTITY = TOTOUANTITY -— 1 3 
QUANTITYSOLD := QUANTITYSOLD + 1 3; 
TOTAL :=TOTAL + PRICE 3 
TAX #=: TAX + O,OL#VATHPRICE 3; 
READLN (NLM) 
END (#WITH#) 3; 
DAYTAX := DAYTAX + TAX ; 
DAYTOTAL := DAYTOTAL + TOTAL : 
WRITELN 35 
WRITELN (“VAT 
WRITELN (“TOTAL 
READLN 
(#TILLSLIP#) 


“> TAX) 3 
2 TOTAL TAK) > 


END 5 


PROCEDURE DAYSTILL 3; 

BEGIN 
WRITELN (“SUBTOTAL = * 
WRITELN (“VAT = 
WRITELN (“TOTAL = 
READLN 

END $ (#DAYSTILL#) 


» DAYTOTAL) 3; 
“, DIAYTAX) 3 
“, DAYTOTAL + DAYTAX) 3; 


PROCEDURE WEEK ; 
VAR I : INTEGER ; 
BEGIN 
WRITELN( “NUMBER NAME 
FOR IT t= 1 TO TOTNUM Do 
WITH ITEMCI] DO 
BEGIN 
WRITE (NUMBER, * “NAME, ~ “ PRICE,“ ee 
WRITE( TOTGUANTITY, “ ,BUANTITYSOLD) 3 
IF REORDERLEVEL?TOTGUANTITY -— QUANTITYSOLD 
THEN WRITE (° Y “) 
ELSE WRITE (°- N ars 
WRITELN (VAT) 3 
QUANTITYSOLD := 0 
END $3 (#WITH#) 
READLN 
END $3 (#WEEK#) 


PREECE STOCK SOLED REORDER 


PROCEDURE AMENDFILE 3; 
VAR NUM, FIELD : INTEGER ; 
CONT §& CHAR 3 
PROCEDURE RECMENI 3 
BEISIN 
WRITELN( “TYPE © FOR NO CHANGES.”) 3 
WRITELN( “ TO ALTER A NAME.~) 3 
WRITELN( “ FO ALTER A PRICE. 4) 3 
WRITELN( * TO ALTER A CURRENT STOCK LEVEL. *) 3 
WRITELN( “ TO ALTER A WEEKLY SALES LEVEL.~) 3 
WRITELN( TO ALTER A REORDERING LEVEL.“) 3 
TO ALTER A VAT RATE.) 3 


CUO bine 


WRITELN( * 
READLN 
END 3 (#RECMENU#) 


PROCEDURE NOCHANGE ; 
BEGIN 
WRITELN (”° NO CHANGES MADE. 
END $ (#NOCHANGE+) 
PROCEDURE NAMECHANGE 3; 
BEGIN 
WRITELN (“OLD NAME —-->", 
WRITE (“NEW NAME -->") 3 
READLN (ITEMCNUM]. NAME) 
END $3 (#NAMECHANGEs) 


“) § READILN 


ITEMCNUM].NAME) 3 


PROCEDURE PRICECHANGE 3; 

BEGIN 
WRITELN (“OLD PRICE -->", 
WRITE (“NEW PRICE --2>*) 3 
READLN (ITEMCNUM]. PRICE) 

END $ (#PRICECHANGE*) 


ITEMCNUMI.FRICE) 3 


PROCEDURE TOTCHANGE 3 

BEGIN 
WRITELN (°OLD STOCK LEVEL -->", 
WRITE (“NEW STOCK LEVEL --2°) 3; 
READLN (CITEMCNUM]. TOTGUANTITY) 

END 3 (#TOTCHANGE*) 


ITEMCNUM]. TOTGUANTITY) 3 


PROCEDURE 
BEGIN 
WRITELN (“NUMBER SOLD -->°, ITEMCNUMI.GUANTITYSOLD) 3; 
WRITE (“NEW NUMBER SOLD --2") 3 
READLN CITEMCNUM]. GUANTITYSOLD) 

(#SOLDCHANIGE * ) 


SOLDCHANGE 3 


END 3 


PROCEDURE ORDERCHANGE 3; 
BEGIN 
WRITELN (“OLD REORDERING LEVEL --=", 
WRITE (°NEW REORDERING LEVEL --?") 3 
READLN (ITEMCNUM]. REGRDOERLEVEL ) 
END $3 (#O0RDERCHANGE ) 
PROCEDURE VATCHANGE 3; 
BEGIN 
WRITELN (“OLED VAT RATE -->", 
WRITE (“NEW VAT RATE -->") 3 
READLN (CITEMCNUMI. VAT) 
END 3 (#VATCHANGE+) 
BEGIN (#AMENDFILE) 
REFEAT 
REPEAT 
WRITE (“RECORD 
READLN- (NLM) 
UNTIL (NUM>O) AND (NUM <= 
WITH ITEMCNUM] [id 
BEGIN 
RECMENU 5 
READLN (FIELD) 3 
Fer eEReS 6) GR -CRTEED < 
CASE FIELD OF : 
O &§ NOCHANGE 3 
= NAMEISHANGE 3 
* PRICECHANGE 3 
+ TOTCHANGE 35 
+ SOLDCHANGE 35 


ITEMCNUMI.REGROERLEVEL) 5 


ITEMCNUMI.VAT) 3 


NUMBER --2")5 


TOTNUM) 3 


©) THEN FIELD t= © 3 


PUNE 


VAT" )3 


expanded version of FIRSTILL. In 
FIRSTILL the data was input at the 
beginning of each program run. This 
may be acceptable for a shop that sells 
five items, but for one that sells fifty it 
would be a tedious and time consuming 
process. BIGTILL differs from FIRS- 
TILL in that the records are held on 
disc in a file (called RECORDS.DATA), 
loaded into memory at the start of each 
day’s transactions and copied back at 
the end of each day. Throughout the 
day the records are held in memory in 
array ITEM. 

In FIRSTILL, PROCEDURE SUM- 
MARY produced the day’s results. In 
BIGTILL results are produced weekly 
by PROCEDURE WEEK (lines 106 
through 122). As it’s important to know 
what should be in the till at the end of 


each day PROCEDURE DAYSTILL 


(lines 98 through 104) is provided. 
DAYTOTAL (line 225) and DAYTAX 
(line 226) keep tabs of the shop’s 
money and the government’s money 
respectively. 

Upon starting up the execution of 
the program the user is asked if there is 
an old file (line 227). If the answer is 
yes, PROCEDURE SETUP (lines 19 
through 32) opens the file (line 23) and 
gets the first record. Note that RESET 
takes two parameters — the identifier 
STOCKFILE and the string RECORDS. 
DATA (which actually. appears in the 
system directory). The second parame- 
ter is required by UCSD PASCAL and is 
not required in standard PASCAL. In 
lines 24 through 29 each record is read, 
One at a time, from the STOCKFILE 
into ITEM. The loop is terminated when 
the End of File marker is hit (line 14). 
Line 30 contains another reserved word, 
CLOSE, that is needed only in UCSD 
PASCAL. In this version of PASCAL 
files must be closed before the next 
RESET or REWRITE can __ occur. 
CLOSE(X) deletes X as well as closing 
it while CLOSE(X, LOCK) retains X 
in the directory. 

If the user does not have a file, then 
PROCEDURE INITIALISE (lines 34 
through 59) is called. In line 39 the 
STOCKFILE is opened for writing. 
(Note that RECORDS.DATA is only 
needed by UCSD PASCAL.) For each 
record, the FOR DO loop (lines 40-56) 
reads each field into a record STOCK- 
FILE? and then writes this record 
(line 55) to STOCKFILE. Since this 
process does not put the information 
into ITEM it is necessary to call SET- 
UP (line 58) to read the new discfile 
into memory. 


PROCEDURE WRITEFILE (lines 
61 through 71) opens the STOCKFILE 
for writing (line 64) and then in the 
FOR DO loop (lines 65 through 69) 
assigns each element of the array ITEM 
into the file window STOCKFILE?t so 
that it can be written to the file (line 
68). In fact, line 67 (and line 26) shows 
one of the major advantages of having 
a record data structure. Assignment of 
One record to another of the same type 
can be done in a single statement. This 
is true even if the fields of the record 
contain records, sets and arrays. 

PROCEDURE AMENDFILE (lines 
124 through 209) allows the user to 
alter any of the information in array 
ITEM. This allows for the correction of 
mistakes made, as well as for changing 
the stockfile levels when stock comes 
into the shop or “‘walks’’. In line 208 
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@ | 201 6 2 VATCHANGE ® 
202 END (#CASE#) 
203 

@ | 204 END (#WITH#) $ @ 
205 WRITE (“MORE CHANGES, TYPE Y OR N --2*) 3 
206 READLN (CONT) 

@ | 207 UNTIL CONT = “N% $3 2 
208 WRITEFILE (#NOT ESSENTIAL BUT DONE TO MINIMIZE EFFECTS OF A SYSTEM CRASH#) 
209 END 3 (#AMENDFILE#) 
210 

ad 211 PROCEDURE HELF ; ad 
212 BEGIN 

@ | 212 PAGE (OUTPUT) 3 a 
214 WRITELN (“TYPE H TW. SEE THIS DISPLAY”) 3 

215 WRITELN (° T TO PRODUCE A TILL SLIP“) 3 
214 WRITELN (° D To PRODUCE THE DAY*’*S TILL TOTALS“) 3 

@ | 217 WRITELN (° W TO PRODUCE A SUMMARY OF THE WEEK’ °S SALES“) 3 ® 
212 WRITELN (° E TO EXIT FROM THIS PROGRAM) 3 
219 WRITELN (° A To ALTER THE STOCKFILE’) 3 

@ | 220 READLN @ 
221 END 3 (#HELP#) 
222 

@ | 223 BEGIN (#MAIN FROGRAM*) & 
224 ACCEPTABLE)-t=. (7A, 20s 46250 7H “W'S “TAI 
220 BDAYTOTAL == 0 35 

@ | 226 DAYTAX := 03 a 
227 WRITE (“DOES A FILE ALREADY EXIST. TYPE Y OR N --=") 3 
222 READLN (OLD) 3 
229 IF OLD = “Y“ 

e 230 THEN SETUP ad 
231 ELSE INITIALIZE 3 
232 WRITELN (“TYPE H FOR HELP.”) 3 

@ | 223 REPEAT 2 
224 READLN (ANSWER) 3 
235 IF NOT (ANSWER IN ACCEPTABLE) THEN ANSWER t= “Ho o3 

@ | 2264 CASE ANSWER OF eS 
237 “Q’ + AMENDFILE 3 
238 Dp’ : DAYSTILL 3 

@ | 229 E’ : BEGIN WRITEFILE ; WRITELN (“GUD BYE) END 3 2 
240 H* : HELP $ 
241 72-8 TILGSCIP -s 

@ | 242 “We ot WEEK & 
242 END (#CASE#) 
244 UNTIL ANSWER = “E° 
245 END. 


PROCEDURE TILLSLIF 3; 
VAR TOTAL, TAX : REAL 3 
NUM = INTEGER 35 
BEIsIN 
TOTAL += 0 3 
TAX := © 35 
READLN (NUM) 3 
WHILE NUM > -1 D0 
BEGIN 
SEER (CSTOCKFILE, NUM) 3 
GET (STOCKFILE) 3 
WITH STOCKFILE™ DO 
BEGIN 
WRITELN (NAME, ~ 
QUANTITYSOLDI := 
TOTBUANTITY = 
TOTAL == TOTAL + FRICE 35 
TAX == TAX + O.O1#VAT 3 
SEEK (STOCKFILE, NUM) > 
PUT (STOCKFILE) 3 
READLN (NUM) 
END (#WITH*) 
END 
END 3; (#TILLSLIF*) 


Look up table 


Computer jargon 
File-handling 
Sequential File 
Direct Access File 
Records 

Fields 


Master File 

File window — Buffer Variable 
Update 

Packing 

Peripheral 

Default 


PASCAL Reserved Words 
RECORD 

WITH — DO 

FILE — OF 

RESET 

REWRITE 

GET 

PUT 

EOF 


UCSD Excpetions 
See Sections 3 & 4 
SEEK 

CLOSE 


Exercises 
| (i) Rewrite FIRSTILL using WITH 
| Gi) Rewrite BIGTILL using SEEK 


PROCEDURE WRITEFILE is called to 
make the changes permanent. It isn’t 
essential to do this, since before exiting 
from the program for the day, the file 


5 cont’d 


CR RDCED = 3 
QUANTITYSOLO + 1 3 
TOTMUANTITY - 1 3 


is written to disc (line 239); it’s a pre- 
caution to prevent the loss of data if the 
system crashes. 

Compared with handling ordinary 
variables, the business of file-accessing 
is clearly rather awkward in program- 
ming terms. In particular, where large 
files of textual materials are concerned, 
PASCAL supports a number of speciali- 
zed features. These will be dealt with in 
our subsequent chapter on word-proces- 
sing. 


Direct Access file 
handling 


Up to this section all the examples have 
dealt with sets of data that couid be 
completely held in main memory while 
processing occurred. With memory 
prices decreasing generally and the new 
16-bit micros with their enormous 
address spaces coming on the market, 
many applications will actually be able 
to keep their data in main memory in 
this way. However, if one isn’t planning 
to purchase a Z8000 with a megabyte 
of RAM ‘there probably will come a 
time when the amount of data required 
is too large for the memory available. In 
this case files are kept on disc (or tape) 
and only the recerd currently being pro- 
cessed will be in memory. As access 
speeds on disc are very much slower 
than those of main memory, every 
effort has to be made to minimize 
access time. 

When data is held in main m2mory, 


the data can be updated during each 
transaction. When the data is held in 
sequential files, however, such altera- 
tion is more complicated. The file must 
be copied over into a new file, one 
record at.a time. When the record to be 
altered is reached, it is brought into 
memory, amended and then written out 
into the new file. The rest of the file is 
then transferred as before. Although 
this technique ensures that the data 
being accessed is always up-to-date, 
the delay between transactions would 
be of the order of minutes for any rea- 
sonably sized file. In consequence, 


sequential files are not usually up- 
dated in this way. Instead, a secondary 
file with the update information is 
established and all alterations over some 
period (e.g. a day) are collected. At the 
end of the period the master file is 
updated. Unfortunately, as this period 
drags on, the master file becomes pro- 
gressively more inaccurate and in some 
applications (e.g. airline reservation sys- 
tems) such out-of-date information is 
completely unacceptable. 

If PASCAL is to become acceptable 
as a viable language for data processing, 
it will have to offer the more conveni- 
ent direct-access facilities associated 
with disc-based backing store rather 
than the current standard tape-based 
sequential access methods. We hope 
that the standards bodies currently 
working on PASCAL will take this into 
account. In the meantime we have 
taken the liberty of discussing the 
UCSD implementation of these features 
which, although non-standard, are 
widely available on micros. 

SEEK is a UCSD reserved word that 
will search out an individual record 
from a disc file. SEEK requires two 
parameters, the first being the file 
identifier, and the second, an integer 
representing the record number to 
which the window must be moved. The 
first record of a UCSD direct-access file 
is number Q. 

If STOCKFILE in program BIGTILL 
became so large that the internal array 
ITEM could not fit into the available 
memory, several changes would be 
necessary in the program. Since only 
one record would be present in memo- 
ry, the array ITEM would become 
superfluous. Procedure TILLSLIP in 
BOX 6 is a rewrite of the version in 
Box 6. Line 10 locates the required 
record while line 11 reads it into the 
window STOCKFILE* STOCKFILE 
in line 12 corresponds to ITEM[NUM] 
of line 81 Box 5. After the informa- 
tion has been accessed and altered (lines 
14-18) the amended record is copied 
back into STOCKFILE. Line 19 is 
necessary because a GET moves the 
window forward one record, so that 
PUT in line 20 would otherwise over- 
write the (NUM + 1)th record rather 
than the NUMth. 

Exercise: Re-write BIGTILL for a 
direct access master file. 


Conclusion 


Different methods of file-access and 
their relation to the different media on 
which the information is stored have 
been discussed. It would be misleading 
to pretend that “‘normal’’ data proces- 
sing programs are as trivial as the exam- 
ples we have discussed, but we hope 
that they have been sufficiently realistic 
at least to illustrate the concepts invol- 


ved. 
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The Sinclair ZX80 must have made computer 
history with its instant popularity, and the 
story is just beginning. 


The ZX80 represents the most powerful and 
cost effective educational tool available. If 
you want to learn about computers and 
programming without breaking the bank, 
then you should join the thousands of ZX80 
owners. 


And if you already have a ZX80 you'll be 
able to take advantage of a host of new 
accessories becoming available. Accessories 
like the new 8K ROM, the RAM expansion 
and the low cost printer. 


We already have a selection of literature for 
the ZX80 and that will be expanding all 
the time. 


So join the Sinclair ZX80 revolution today 
and find out what low cost personal com- 
puting is all about. 


We already have a 
selection of literat- 
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SINCLAIR 


So join the Sinclair 
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all about. 


¥ Ae — Y _— 
CS d 
a i i) MAS 
a A 
S 


SINCLAIR ZX80 COMPUTER 


Includes ZX80 BASIC manual. . . . $295.00 
MAINS ADAPTOR] Sr $ 16.00 
THE ZX80 COMPANION BOOK.. $ 16.00 
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MICROSOFT 
EDITOR! ASSEMBLER 


The most powerful Editor/Assembler 
package available for TRS-80 or 


System 80 owners. An ¢ 
39-90 


invaluable help to 
all programmers. 
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| STRINGY FLOPPY 


75 CASTLEREAGH STREET, 
SYDNEY 
BOX 4715 G.P.O. SYDNEY 2001 


CAST LERE AGW 
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The ever-popular COMMODORE PET = is 
now available with full-size keyboard and 
for a limited period we will be offering 
them at the attractive price of just 
$999.00 (normally $1,169.00). 


We are expanding our range of software 
for the Apple range from many sources 
including the broad PROGRAMMA 
INTERNATIONAL range. 


LISA Interactive Assembler 

(requires 48K and Disk II drive). . 
BPP FORM FRAN... Soo 2c es $140.00 
APPEESOFPT TOOL Kile 3 oe: $ 80.00 
“SANDY’S’’ WORD PROCESSOR $250.00 
APPLE PLOT $ 75.00 


We also have the complete range of Apple 
hardware, from graphics tablets to ROM 
cards. Call in and ask us about Apple 
computer systems. 


You get the COMMODORE PET with its 
clear green phosphor monitor screen and 
a dedicated external cassette for this very 
low $999.00. 


$ 44.95 


The PET has established a justifiably high 
reputation for quality and power. Drop 
in soon for a demonstration. 


ATTENTION TRS-80 AND 
SYSTEM 80 OWNERS 


Fed up with slow tape recorders on your sys- 
tem? Do you spend ages searching for pro- 
grams? The answer is the remarkable EXA- 
TRON STRINGY FLOPPY. No more manual 
controls to press and levels td adjust. 
STRINGY FLOPPY is a compact high speed 
tape transport system, entirely under the 
control of the computer, designed for DATA, | 
not music. 

Unlike cassette recorders 
STRINGY FLOPPY 

uses specially designed 
“wafers” containing 
endless loops of chromium 
dioxide tape. 


SYSTEM FURNITURE 


We are suppliers of a superb range of quality 
furniture designed especially for computer 
systems. These are not the usual over-priced 
low quality tables. This range is well designed 
and sturdily constructed, and yet almost half 
the price of some competitors. 


The system desk illustrated has a special area 
for disk drives, a shelf for fan-fold paper, 
plenty of area for the computer, monitor 
and printer, and even a drawer for listings, 
disks, etc. All in attractive woodgrain on 
a black steel frame. The price? 


$339.95 plus Carriage. 


Superb value and just one of an excellent 
range. 


comes complete with 
every thing needed to 
connect it quickly to the TRS-80. A special 
adaptor is available to connect it to the Dick 
Smith System 80. We even include a box of 
10 mixed length wafers and it carries a six 
month limited warranty. 
“The quality of both boards and workman- 
ship is far superior to that normally expected 
in the hobby market, and can be summed up 
in one word — professional”. Thomas 
Murphy APC July 1980 
STRINGY FLOPPY, with operating system, 
plug pack power supply, data I/O program 
and box of wafers — FOR TANDY TRS-80 
Po ae eine ONLY $350.00 
Adaptor for connection to Dick Smith Sys- 
tem 80 (includes power supply and provides 
extra parallel printport) ....... $125.00 


75 CASTLEREAGH STREET, 
SYDNEY 
BOX 4715 G.P.O. SYDNEY 2001 


City 


Personal 


Computers 


SYSTEM 80 S-100 
EXPANSION INTERFACE 


City Personal Computers is just a 
couple of months old and yet already we 
are becoming established as Sydney's 
leading computer shop. 


We're right in the heart of the City, so we're 
easy to get to, and when you reach us you 
can choose from the widest selection of 
computer equipment and software to be 
found anywhere. 


Just look at some of our suppliers: 

APPLE, COMMODORE, SINCLAIR, DICK 
SMITH, DEFOREST, EXATRON, MICRO- 
POLIS, PERTEC, PROGRAMMA, SYSTEM 
SOFTWARE... 


And the list goes on and on. 


By offering the widest range of hardware 
and software we aim to make computing 
more enjoyable for you. 


®@ Includes controller for up to four.single 
density disk drives. 

@ Centronics type parallel port. 

RS 232 C Serial communications port. 

@ Two vacant S-100 card slots. 


ALL FOR $499.00 


So why not call in soon and see what we 
have to offer. 


16K EXPANSION CARD for System 80 
Expansion Interface. 

Just plugs in and gives you extra 16K of 
RAM with room for another 16K on the 


same board. $1 99.00 
$ 59.95 


Further 16K RAM see es 


DAISY WHEEL PRINTER at only $1995 
allows word processing at super-low cost. 
Come in and talk to us about it. 


MICROLINE 80 


IMPACT PRINTER 


EXIDY SORCERER 
with 8K BASIC ROM Pac. 


ORDER FORM: 


Quantity 


Item Description 


Sect PsP OR eB BE eeT SOFT HK ERR OR AR EH SEH SET HSH STE SSPE Bae eS EEE BERS EAE 


SP SSP SSS S ae SSS SETTER HST SAM es HABHS HSK HHH FET HEEH HHH eR SRB eEH EEE BEES 


Few printers are as well known and respected 
as the MICROLINE 80 and we are offering 
them at a very attractive: 


$895.00 
(+ $10 p+p) 


BANKCARD/ 


Oe eerr errr r rere re eee eee eee eer eee eee eee eer eee 


Features include: 

® Full ASCII upper and lower case 
® Full graphics 

® 80 or 132 characters per line 

® 80 characters per second 


Serial and parallel interfaces, tractor feed 
and connecting cables are available. 


SEND To City Personal Computers 


Oe eee eee ere eee Pere eee eee eee eee eee eee eee eee eee) 


ee PO SEC OGRE caissks 


CAST LERE AGH 


SORCERER CORNER 


We are now stockists of software from such 
highly respected houses as SYSTEM SOFT- 
WARE of Perth and SOFTWARE SOURCE 
of Sydney. Some examples of our range: 


SYSTEM 2 by Richard Swannell 


Features include: 
Screen Editor, Function key operators, 
Renumbering routine, BASIC buffer 
protector, Printer driver, Revival routine 


and many others... $ 25.00 


RS 232 PRINTER DRIVER 
can be added to SYSTEM2.$ 10.00 


GALAXIANS the ultimate ‘invader’ 
$ 19.95 


MACHINE CODE TUTORIAL 
PACKAGE, set of 8 tutorial programs 
on cassette... $ 24.95 


SOFTWARE SOURCE ROM 


PAC modifications for Sorcerer... 


game for the Sorcerer... 


p.O.a. 


HARDWARE: 

Sorcerer 11 16K RAM... $1,395.00 

S-100 Expansion Bus... $ 575.00 

Micropolis Disk with Controller... 
$1,350.00 


Box 4715 G.P.O. Sydney, 2000, N.S.W. 


Item Price 
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CARD EXPIRY 
DATE: 


Despite the limited time available for 
submission of entries to our second 
Sinclair ZX80 competition, ‘‘One-liners”’ 
arrived thick and fast at our offices in 
time for the judging. 

After some deliberation between the 
adjudicators, it was decided an entry 


ZX 80 WINNER 


which printed alphanumeric characters 
in an infinite loop was not really what 
was required (despite. a claim by the 
author that, given enough time, the 
program would generate all possible 
‘‘One-liners’’ — and in most languages!) 

Gerard Kohne emerged victorious 


and his entry will be published next 
month. 

As promised, below are the winning 
entry from the first competition and 
five runners-up who will each receive 
a complimentary subscription to APC. 


Microprocessor Simulation 


by John Tonkin, (still on sedatives a month after receiving his ZX 80) . 


John’s simulation is an excellent intro- 
duction to machine language programm- 
ing and, even if the subject is not pur- 
sued, it provides some understanding of 
registers and data movement within 
microprocessors. Computer Science 
courses in secondary schools might con- 
sider such simulations as a way of intro- 
ducing students to assembly and machine 
language programming without involving 
them in the complexities of actual 
processors. 


This program is designed to simulate a 
simple base 10 (decimal) microprocessor. 
The microprocessor contains 16 data 
registers and one accumulator, each of 
which can contain a value in the range 
999: to +999: 

The microprocessor has 12 instruc- 
tions which enable the user to manipu- 
late numerical data between the registers 
and input and output data. 

Programs may be written by using up 
to 50 program lines each containing an 
instruction or data. 


INSTRUCTIONS : 
Central to the microprocessor is the 
accumulator. Most of the microprocess- 
or’s 12 instructions are involved in trans- 
ferring values to and from the accumul- 
ator, from the data registers, and from 
the keyboard and monitor. The data 
-registers act as memory for the micro- 
processor. 

The instructions are divided 
four main categories: 

— INPUT/OUTPUT 

— DATA CONTROL 

— MATHEMATICAL FUNCTIONS 

— COMMANDS RELATING TO 

FLOW OF CONTROL. 

Each instruction has a numerical code 
which must be used in the program. 


INPUT/OUTPUT: 

INPUT — is used to transfer a number 
from the keyboard to the accumulator 
during execution of the program. 
NUMERIC CODE : 9 


OUTPUT — is used to transfer a number 
from the accumulator to the monitor. 
NUMERIC CODE : 10 


DATA LIST — this instruction per- 
forms the same function as a DATA 
LIST (see monitor). It lists the contents 
of the data registers. 

NUMERIC CODE : 11 

DATA CONTROL: 


LOAD — loads the accumulator with 
the contents of the data register spec- 
ified in the next line of the program. 
NUMERIC CODE : 4 

e.g.1:4 2:15 will load the accumulator 
with the contents of data register 15. 


into 
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STORE — loads the data register specif- 
ied in the next line of the program with 
the contents of the accumulator. 
NUMERIC CODE : 5 

DATA — loads the accumulator with 
the contents of the next line of the 
program. 

NUMERIC CODE : 6 

e.g. (program line numbers 4 and5)... 
4:6 5:574 #2these lines will load the 
accumulator with the value 574. 


MATHEMATICAL FUNCTIONS: 


ADD — adds the value of the data 
register specified in the next line of 
the program to the accumulator and 
stores the result in the accumulator. 
NUMERIC CODE : 7 


MINUS — subtracts the value of the 
data register specified in the next line 
from the value of the accumulator and 
stores the result in the accumulator. 
NUMERIC CODE : 8 


FLOW OF CONTROL: 


JUMP — causes the program to jump to 
the line number specified in the next 
line of the program. i.e. the next line 
to be executed is the one specified. 
NUMERIC CODE: 1 

e.g. (program line numbers 5 and6)... 
5:1 6:31 these lines will cause the 
program to jump to line 31. 

JUMP IF O — causes the program to 
jump to the line specified if the value 
of the accumulator is O. 

NUMERIC CODE : 2 

JUMP IF =>O — causes the program to 
jump to the line specified if the value 
of the accumulator is greater than O. 
NUMERIC CODE: 3 

HALT — ends the program and returns 


control to the monitor. 
NUMERIC CODE : 12 


MONITOR: 

The monitor enables the user to list, 
alter, and run programs and consists of 
five commands. When the monitor is 
run, it will respond with: P/D/L/A/R? 
This is a request to the operator to 
enter the appropriate letter for the 
required command of the following: 
P-PROGRAM — enables the operator 
to enter a program by asking for the 
line number and contents of the line 
to be entered. e.g. P/D/L/A/R? P 
LINE;? 1 

?9 will enter code 9 into line 1 of the 


program. 

When finished entering the program, 
enter the next line and then 9999 as 
its contents to return to the monitor, 
e.g. LINE ? 43. 

29999 
P/D/L/A/R? 


~ D-DATA — enables entry of data directly 


into the data registers. When executed 
the monitor requests the number of 
the register to be altered and then 
the new contents of that register. 
e.g. P/D/L/A/R? D 

REG ?1 

? 36 this loads data register 1 with 
the value 36. To return to the beginning 
of the monitor enter O as the register 
number. 
e.g. REG ? 4 

2138 

REG ? O 

P/D/L/A/R? 
L-LIST — lists the program and then 
returns to the beginning of the monitor. 
A-LIST DATA — lists the contents of 
the 16 data registers and then returns 
control to the beginning of the monitor. 
R-RUN — runs the program and then 
returns control to the beginning of the 
monitor when a HALT instruction or 
error is encountered. When an over- 
flow error occurs the monitor prints E. 


SUMMARY: 


INSTRUCTION CODE NUMBER of 
LINES 

Input 

Output 1 

Data List 1 

Load 

Store 

Data 

Add 

Minus 

Jump 

Jump if O 

Jump if > O 

Halt 12 


SAMPLE PROGRAM: 
This program is designed to multiply 
two positive numbers together. 


CwrnrrFonnnto or FH © CO 
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LINE INSTRUCTION CODE 
1 Input 9 
2,3 Store 1 D4 
4 Input 9 
5,6 Store 2 EMee 
t;°8 Data — 1 pene: | 
9,10 Add 2 (eas 
TF? Store 2 ae 
13,14 Jump if O, 23 2.20 
15,16 Load 1 4,1 
EL ES Add 1 ied 
19:5 20 Store 1 See 
21-29 — dump 7 1:7 
23,24 - Load 1 4,1 
25 Output 10 
26 Halt 12 


Enter each line and its respective code. 
When run the program will ask for two 


inputs and then print out the product of 
the two numbers. 


Programs with more lines can be written if the computer has more memory. 
1 DIM A(5Q) Pm 330 GOTO 10 
2 DIM B(16) 400 FOR T = 1 TO 16 
5 M=0 ad 410 PRINT T;" ";B(T), 
10 PRINT "P/D/L/A/R"; S 420 NEXT T 
20 INPUT CS & 430 IF M=l1l1 THEN RETURN 
30 IF CS= "P" THEN 100 440 GOTO 5 
40 IF CS= "D" THEN 200 e 500 L=0 
50-IF CS= "i" THEN 300 & 210 i=L+1 
60 IF CS= "A" THEN 400 e 520 TF X$999 OR: X€-999- THEN 720 
70 IF CS= "R" THEN 590 530 IF L350 THEN 710 
80 GOTO 10 ad 540 LET M=A(L) 
100 PRINT "LINE;"; & 550 LET N=A(L+1) 
110 INPUT I ® 560 IF M=] THEN LET L=N 
120 IF I> 50 THEN 100 570 IF M=2 THEN IF X=0 THEN LET L=N 
130 INPUT A(T) ® 580 IF M=3 THEN IF X>0 THEN LET L=N 
140 IF A(I)=9999 THEN 10 & 590 IF M=4 THEN LET X=B(N) 
150 IF A(I)<999 AND A(I)}-999 le 600 IF M=5 THEN LET B(N)=xX 
THEN 1OO 610 IF M=6 THEN LET X=N 
160 PRINT "E" @ 620 IF M=7 THEN LET X=X+B(N) 
170 GOTO 130 ® 630 IF M=8 THEN LET X=X-B(N) 
200 PRINT "REG;"; 640 IF M=9 THEN INPUT X 
210 INPUT J | ® 650 IF M=10 THEN PRINT xX | 
220 IF J€1 OR- 3916 THEN-5 & 660 IF M=11 THEN GOSUB 400 
230 INPUT B(J) ° 670 IF M=12 THEN GOTO 5 
240 IF B(J)€999 AND B(J)>-999 680 IF M>8 THEN 510 
THEN 200 | * 690 IF M33 THEN L=L+2 
250 PRINT "E" @ 700 GOTO 520 
260 GOTO 230 710 PRINT"E" 
300- FOR=K=1- TO °50 e 720 GOTO 5 
310 PRINT K: eee ? A(K) ep eee & 730 END 
320 IF A(K)€>9999 THEN NEXT K 
Basic E Calculator 
by P. Sutherland 
This program uses a method ofevaluation portion and a fractional remainder to include all terms up to 1 /32761. In 


first described by A.H.J. Sale in Com- 
puter Journal Vol. II pp 229-230. Itisa 
variation on the standard summing of a 
power series method and _ therefore 
depends on the fact that, except for the 
first two digits, each successive term 
and the sum of each successive term is 
less than one. Therefore, if a_ trun- 
cated portion of the series is multiplied 
by 10, it will then consist of an integer 


series. The integer can be removed and 
printed, and the process is then repeated, 
giving in sequence the fractional digits 
of e. 

Since only integer arithmetic is re- 
quired, except for the calculation of the 
number of iterations required, this 
procedure is fairly fast. Given a maxi- 
mum integer size of 32767 (as on the 
ZX-80 ), this algorithm allows the series 


REM this is where the real crunch- 


other words if you had the time and 
the memory, you could calculate e on 
the ZX-80 to about 10000 digits before 
losing accuracy. 


(Although the author did present a 
compressed version of the program 
which was easily within the 1k limit, 
we present below a fully expanded 
version for the sake of readability —Ed. ) 


APC 41 


@| 910 REM A program to calculate e to & @| 170 REN @ 
as many places as required ing is done ae 
@| 020 REM program by P. Sutherland e @| 180 REM firstly we must initialize the é 
20-Sep-19 80 coefficient matrix C(M) 
@| 030 P=3.14159 eo @ oh Sehr TOM & 
040 PRINT “Number of places to : 
6 calculate e to”; @,) ©) 210 NEXT J e 
050 INPUT N 220 REM the first place is known! 
ve @) (@| 230 PRINT “e=2.”; ® 
@| 060 REM This is where we calculate ae. : 
the number of iterations e @ 240 REM let the computation really ® 
@ 070 REM required for the inner loop, — : 
r as well as the storage e @ Ay ae 1-1 TON & 
080 REM d for th fficient : 
= es ans eae eee e| le|270 FORJ=MTO2 STEP +1 e 
090 REM we must do at least four 280 T= INT (C(J) *10 + D) 
@ iterations! @ j@| 290 D-=INT (T/J) ®& 
100 M=4 300 C(J)=INT (T—D*J) 
@ + * @ (@/310 NEXTJ & 
110°. T= (NE )*F2:302 | : 
120 IF M*(LOG(M) —1) +.5 *LOG 320 REM after each calculation, we 
@ (2*P*M) ) T THEN 160 e |e output one digit of e! 
130 M:-M¢+41 330 PRINT D; e 
@ i135 GoTOol 20 ad @/340 REM and back around for another 
| 140 REM if there is insufficient mem- e ee one! & 
e ory for the number of places 850 NEXT I ate : 
@| 150 REM requested, then BASIC will @| j@| 260 REM we finish it off nicely! & 
give an error at this point. 870 PRINT 
160 DIM C(M @| |@/380 END 2 


Above all else this program is an ex- 
ercise in artificial intelligence; it demon- 
strates in very simple terms how a com- 
puter can possess that most basic of 
human capabilities i.e. the ability to 
learn. 

The program is divided into two 
parts — the first part being the learning 
phase, the second being the _ testing 
phase. It asks the operator how many 
geometric shapes it is required to learn, 
and then one by one the operator must 
enter the various shapes. They are 
entered in a 5 by 5 matrix, using full 
stops as markers for lines. The “1” 


SAMPLE ENTRY 


INTER AN 


Learnit 


by D. Traverso 


appearing before and after each line of 
data is required to allow leading spaces 
to be entered and also to help remember 
when to correctly press ‘““CR” i.e. only 
after five characters have been entered. 

The computer studies each object 
in turn and asks what it is called. Then 
the computer asks the operator to enter 
one of the objects which it previously 
studied. The computer then establishes 
through the use of logic what the object 
is called. 

The program doesn’t simply compare 


the image with that held in memory, 


QORJIECT -FP LEASE 


ataees toe 1% 

aaa See ae L 

: ae oe eae L 

< 4 + + - th SF 

THIS OBJECT HAS 3 UNEQUAL SITES 
WHAT IS THIS ORJIECT CALLED? 


RINT? Sines 


GOSUBSSO 
FORI=1TOS 


NEAT I 
FPRINT "*ALTIEWN 


GOTOisS6 


NEXTJIINEXTI 
RESTORE 
FORT=1TOS 
REATIE » F 


NEA TTS RETURN 


IFG>HTHENH=G 


eeeeoeeeee@eee#ee#ee¢?e¢ee#sed¢e?eee?e?d6&eeeee @ 
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FORM=-1TOS:;GOSUBRSSO 
BRBtMriOIHKALTTIFRB/A=-HRHENB CMs TLS 1 
at FRINT* THIS OBJECT 
TFPRBCA=HTHENPR INT "ERUAL * es Ce GOTOPO 
PRINT "UNEQUAL ™ > 


SS ire | eG See 
FRINT* THIS TS .A 


TRIM MGLE 


FRINT * “LEARNIT’ "PRINTS OIMACGr+Ga er BE 
INFUT "HOW MANY OBRIJECTS TO LEARN" +55 


*>GOSUB2Z406 


HAS "Aes 


PRINTS INEUT*WHAT IS THIS OBJECT CALLED" $ & 
FORT=-i1TOLENCHK@ > FB CMs TO=-ASCCMIDSCRS$r Perio dvi nex 
NEATMIFPRINT"* STUDY COMPLETE * $FRINT 
FRINT* IT “VE NOW LEARNED 
FORT=-1TOS: GOSUB410 
FRINTIFRINT "NOW TEST ME - 
*GOSUB2Z456 


*NEXTI 


IFRBCT s103=>ATHENZOG 
IFB/A=HANDBCT s L192=1THEN22¢ 
IFB/A-—-HANDTRC Ts 11s =OTHENZZSO 


TRY 
"> ;<GOSUEBSIO 


B=OtA=O1tH=O!tFORI=1TOS?:tFORJ=1TOS 
IFACTsJ>2=46THENC=1I:0=J?GOTO27¢6 


IFACTI+E s J+F 3 =46THENSSO 


DATAGrv1trivsivirOGris—-LlsrOx—-1Lse—-Ls—-ivs—-ivsGs-Aisi 
FP=1:IFEs:OANDF ->OTHENF=1.5 
B=BtPsACIT s JI=S363 1=I+E? J=JIJ+F it G=Gti 
IFACI+E s JtF 9-46 THENS4O 


G=OA=AATLTIACCsDI=-46:60TO2706 
FRINTSPRINT*ENTER AN OBJECT FLEASE®" 
FORIT=1TOS?: INPUTAS?: FF ORJ=1TOS 
ACI sJO=ASCCMIDSCASs Jt1is1ldX.INEXTITNEXTISTRETURN 

FORJ=1TOSS PRINTCHRSCBCLI es JOOS SCNEXTISTFPRINT? RETURN 


he ee as 


THE FOLLOWING: ":FRINT 


CR. TO END" 


AGAIN" -G0TOLIG 


but rather compares the characteristics 
of the image. This distinction is very 
important because without it the logic 
of the computer would suggest that a 
square is not a square at all simply 
because it differs in size to that which 
it previously studied. 

This type of program would also be 
ideal for teaching children the dist- 
inguishing features of shapes. The child 
could share the learning process with 
the computer and use the testing pro- 
cedures to test itself as well as the 
computer. 


This program is designed to help people 
who are severely physically handicapped 
but have normal intelligence. The con- 
dition is not uncommon among victims 
of cerebral palsy (spastics). They often 
cannot speak and random movements 
of most of their muscles make it very 
difficult for them to communicate or 
for their intelligence to be recognised. 
Fortunately, there is usually some place 
(thumb, toe, eyelid, etc.) over which 
they have some control and therefore 
can work some sort of on-off contact. 


This could be a push button, interrup-- 


tion of a light beam, a strain gauge to 
detect a wrinkling of the skin, or any 
of several other devices. CONTACT 


3 “FROM ALAN MOORE 
1@ DIM AL$¢6,.6>:DEFINT R:CLS 


Contact 


by A. Moore 


allows the output from the device to 
be interpreted as a message on the 
screen. 

The enclosed version of CONTACT 
will work on a TRS-80 Level 2. An 
interface box gives the values 14 or 
15 to port 63 when a microswitch is 
on or off. The screen shows the letters 
of the alphabet in six groups and a 
cursor moves past the groups. A group 
is selected by closing the contact and 
then the characters of the group are 
displayed across the screen. A single 
letter is selected when the cursor 
passes the letter which is then added 
to the message being accumulated 
at the top of the screen. Facilities 


are available for adjusting the speed 
of the cursor and for correcting 
mistakes. 

The program can be made more 
complex in_ several obvious ways, 
but when handicapped people are 
familiarizing themselves’ with the 
program, it is more suitable in its 
simple form. The _ listing below 
contains a modification so _ that 
pushing the space-bar can simulate 
the push-button. Should you require 
input from a microswitch, replace the 
underlined portion of line 90 with 
CeINPi eS 0:1F GC OR C=15 THEN G=C:GaTGSS 
ELSE O=C:IF O=14 THEN 


s:GOTO 35 ELSE IF CA$="7") OR CAS="#" 2G 
OTO SS ELSE PRINTAS; 


15-PRINTSTRINGSC 7.26 ISTRINGSC 22,” ">"CON 
TACT": PRINTSTRINGS¢ 7.26 “ENTER CURSOR JU 
MP TIME ¢SEC)--": INPUT TISRM=INTC TI#7S): 
CLS: PRINTCHRS¢ 28 DCHRS¢ 23 Ds D=15 

2@ FOR RH=1TOS:FOR CL=1TO6:READ ALSCRW.C 
L >: NEXT: NEXT: PRINTCHRS¢ 29 DSTRINGSC 926 >" 


55 FOR RH=16258T016308 STEP1@:POKE RH.32 
:NEXT:GOTO 25 

68 SSR Te lb Rach Sorted © Mets er ere tae tad moe ad Wg 
ta Late ge 

65 OES AS ad 4 Pad” Geared 6 iaeaad © eee eee ee Aeneas» bernagd fe te 
eg ee eee 

7G See St oy ee ee Oe ee 
85 FOR RA=1TOCZ:IF RA=1 THEN RS=25 ELSE 

9G RS=RS+RM: RB=CX+1G2¢ RA-1 ):POKE RB.CY:R 
B=RB-14:POKE RB.32:FOR RC=1TORS:CS=INKEY 
-RB=RB+1@:POKE RB. 


35 NEXT: NEXT: RB=RB+1@:POKE RB»32:RQ=1:RE 


“TI FOR ASU NOY LHU MBJ 77 HE CP 
GX KZ Q» .# ??“CHRSC28)sCHRSCZ | TC? Cer 

323 

25 CK=16149:CV¥=191:CZ=7:GOSUB SSrIF RQ=1 @ paseo 

THEN 25 @ 

35 IF RA=7 THEN PRINT CHR$€S)s:GOTO3@ EL 
SE RD=RA:FOR X=1T06: ¥=16259+18#¢ X-1 >: POK $:IFC$<>" "THENSS ELSE 
E ¥.ASCK ALS€ RA.X)):NEXT @| 32:0=14:RO=0: RETURN 

45 CX=16322:CV¥=14@:CZ=6:GOSUB 85:IF ROQ=1 | 

THEN 45 e TURN 


5@ AS=ALSCRD.RA):IF AS="=" THEN PRINT” * 


165 POKE RB.CY 


The object of the game is the same as 
that of the well-known ‘‘Mastermind”’. 
The exception being that instead of 
colours, numbers are used. The four 
digit number to be guessed is selected 


Mastermoo 
by P. Moody, R. Gleeson and M. Lee 


at random, is non-repeating and does 
not begin with a 0. The player has 
ten guesses in which to correctly deduce 
the number, the program awarding a 
““C”’ for a correctly guessed digit and a 


““B” for a correctly guessed digit that 
is also in the right place. (A “‘C’’ stands 
for a Cow and a “‘B”’ stands for a Bull, 
hence the name “‘MOO’’.) 


10 DIM A(7) 745 IF C-0 THEN GOTO 780 
210 LET A(0)= RND() 750 FORT TOC 

220 FOR J-1 TO 3 760 PRINT “C”; 

230 LET A(J): RND(10) —1 770 NEXT I 

240 NEXT J 780 PRINT 

300 GOSUB 3000 800 IFB4 THEN GOTO 870 

310 IF I? THEN GOTO 210 810 NEXT Z 

350 FOR I0 TO3 815 PRINT 

360 LET A (I+4 )= A(I) 820 PRINT “GIVE UP? IT WAS”; 
370 NEXT I 821 FOR I4 TO7 

375 CLS 822 PRINT A(I); 

380 FOR Zl TO10 823 NEXTI 

400 PRINT “MOO:”; 825 PRINT 

410 PRINT “‘?”; 830 PRINT “MORE? (Y/N)” 

420 INPUTG 840 INPUT Q$ 

425 IFG<1 THEN GOTO 815 850 IF Q$ = “Y” THEN GOTO 210 
430 IFG<1023 OR G> 9876 THEN GOTO 410 860 GOTO 9999 

433° BET AG 870 IF Z:1 THEN GOTO 900 
435 GOSUB 4000 880 PRINT “YOU DID IT IN”’;Z;‘“GUESSES” 
440 GOSUB 3000 890 GOTO 830 

450 IF I=0 THEN GOTO 410 900 PRINT ‘“***FLUKE***” 
455 PRINT A; 910 GOTO 830 

500 LET C# 3000 FORI=0 TO3 

510 LETB# 3010 FORJ=0 TO3 

520 FOR I0 TO3 3015 IF 1: J THEN GOTO 3050 
530 FOR J4 TO7 3020 IF NOT A(I)= A(J) THEN GOTO 3050 
540 IF NOT A(I):A(J) THEN GOTO 590 3030 LET I=0 

550 IF 4+I-J THEN GOTO 580 3040 GOTO 3070 

560 LET C=C+1 3050 NEXT J 

570 GOTO 590 3060 NEXT I 

580 LET B-B+1 3070 RETURN 

590 NEXT J 4000 FORI=0 TO3 

600 NEXT I | 4010 LET A(3-1)= G-(G/10 )*10 
700 PRINT 4020 LETG=G/10 

715 IF B~ THEN GOTO 745 4030 NEXTI 

720 FORT1 TOB 4040 RETURN 

730 PRINT “B”; 9999 CLEAR 

740 NEXTI 


APC 43 


The one-stop Microcomputer Shop 


for total service to TRS-80° users 


*TRS-80 is a registered Trademark of Tandy Radio-Shack 


NOW AVAILABLE 
CISA DISK PASCAL 


Executes up to 60 times faster than DISK BASIC. 


HAS FULL DISK!I/O FEATURES and many facilities not available 
on languages costing many hundreds of dollars. 


DO NOT CONFUSE WITH CHEAP CASSETTE-BASED ‘TINY’ 


LISA 


Systems overlays and developments will be available to registered users at a nominal charge. 
Includes the fastest and most powerful screen editor we have seen. 
Will edit PENCIL, SCRIPSIT and ASCII files. 


PASCAL is much easier to manipulate than ASSEMBLY, and is practically as efficient as it 
compiles into a true-optimized machine-code. 


More efficient than currently available BASIC COMPILERS selling for twice the price. 
We honestly believe that this Australian written PASCAL to be the fastest, most sophisticated 
and powerful high-level language available anywhere in the world for the TRS-80 Model I. 


RELEASE 1.0 $99.00 


(numbered copies to registered single-users only) 


“HISPED” 
TAPE OPERATION 


2K Baud PLUS for the TRS-80* 
Save, verify and load programs up to 4 
times faster than normal 
Save, verify and load array data up to 30 
times faster than PRINT 
User variable hardcopy formatting (3 
output routines work with most printers) 
‘‘HISPED”’ is a machine language program 
(not a hardware add-on) 
2 copies plus a free basic test program 
supplied on high quality cassette — for 
level 2, 16K, 32K or 48K. 

MAKES STRINGY FLOPPIES REDUNDANT 


$24.95 


Available only from Cisa and authorised agents 


CISA HARDWARE 
AND MODS 


HEAVY DUTY POWER LINE FILTER 
Essential in most domestic situations. . $65 
CISA LIGHT PEN (again in stock) 

Includes full documentation and sample 
DrOGKE ts a a ee eee Ge ee $19.95 
CISA DATA DIGITIZER 

Use this with HISPED program and you 
really have a business system in LEVEL 2 
Requires no system modifications $57.50 
AUTOMATIC TELEPHONE DIALLER 
Easy attachment to TRS-80. Requires no 
hardware mods. Complete with softwares 


and documentation... se ee $57.50 
16K UPGRADE KITS 

WEY ROARED Ws 3 ore es $85.00 
INTERFACE KIT (yes there is a difference) 
EE Bid Sake Beth Miron cs See ine a ets Sa BLE eS $105.00 


We fit — $20.00 plus carriage $5 overnight 
return. 


DISK DATA SEPARATOR 

These are the components that TANDY 
forgot. Virtually eliminates all disk 1/O 
errors. Absolutely essential for 77 track 
ISGVS ANG Wet Ps ee a as $49.95 
(sorry no kits) 


GREEN PHOSPHOR TUBES 

Not a cheap plastic overlay. We fit a genuine 
professional standard VDU tube with 14"’ 
armoured low reflective front panel. 

CRO KITS et Ac Se ae ee $99.00 


(fits old and new type Tandy VDU and 
current Dick Smith monitor) 


CISA RS232 PRINTER-DRIVER 

Operate and RS232 or 20MA serial printer 
with this Australian made unit. Includes 
SOTIWare 5s ee ea ae $54.75 


LOWER CASE MODIFICATION 
Get video lower-case for BOTH Scripsit 
and Electric Pencil. Fitted. ..... $49.95 


VIDEO STABILISER CRYSTAL 
Totally removes shimmer and wobble on 
your video. Highly recommended for 
Green Tube. 


DUMMY PRINTER 
Piug this into the parallel port of the inter- 
face and avoid system lockups if you 
accidentally type LLIST or LPRINT $14.95 


TRS-80 SOFTWARE 


AIR TRAFFIC CONTROLLER L2/16K 
Supervise a large area of air-space in real 
$ 


SPACE GAMES L2/16K 
Five brilliant games in the classic space 
SOIC Sas PT ae ag rs See a Lr $14.50 


STRATEGY GAMES L2/16K 
Four fascinating games to test your 
judgement and logic ...... ve {$450 
ADVENTURE SERIES L2/16K 
Adventure-1, The Count, Voodoo Castle. 
BAG poss Ne eh Se a A eG Pee ee 


$14.95 


A fast and exacting opponent. 6 levels of 
IG Aa BPR eo ge on ee a ee $19.95 
TIS ING ks et ree i ee $24.95 


DISASSEMBLER IN BASIC L2/16K only 
Disassembles ROM and high memory 
machine language routines. ...... $9.95 


TAPECHECK L2/16K plus 

Checks and verifies every millemeter of 

a cassette tape. Also useful as cassette 
L7O-haGMOStic oe hte a es $9.95 


RS232 DIAGNOSTIC 32K/DISK 
interrogates, tests and reports on EVERY 
feature of Tandy RS232 board ... $19.95 


FLOPPY DOCTOR 32K/DISK 

This is the most comprehensive and 
exacting series of memory and disk |/O 

tests we have seen. 

From Micho-C nic, USAS 3 Ss. $29.95 


SIMUTEK 7 separate packages 

These seven packages are excellent value 

for any TRS-80 owner ...... $14.95 ea. 
Plus many, many more. 


MICROPOLIS DRIVES 
FOR THE TRS-80* 


For the enthusiast: 192K bytes per drive. 
SINGLE “77: TAAGRKRS  o3chs 3s ot $699.00 


A professional disk drive for the business 
user: 

FTWIN: 47. TRACK: 365.2 ee $1499.00 
Both complete with heavy-duty case and 
inbuilt power supply and free despatch to 
TRSDOS. Requires cables — 2 drive $30, 

3 drive $40, 3 drive $50. 


MIX 'N MATCH with any 35 or 40 track 
drive. SHOP WHERE YOU CAN BE SURE 
OF SERVICE BACK UP AND YOUR 

WARRANTIES HONOURED. 


SOFTWARE FROM RACET 


INFINITE BASIC $49.95 L2 and DISK 
Add 30 BASIC commands plus full 
MATRIX MANIPULATION. 

Add 50 STRING functions, including high- 
speed sorts. 


BUSINESS BASIC (requires INFINITE 
BASIC ia. ee nea oo $29.95 
Another 20 functions including set printer 
parameters, 127 digit mathematical functions 
binary array searches and hash code generators 


COMPROC Command Processor for Disk 
$19.95 
Auto your system to any sequence of DOS, 
machine-language or BASIC routines. 
Includes screen-print, auto debounce and 
lower-case software driver. 


DSM Disk Sort and Merge Min. 32K and 
PIS a Sse ee oper ae ee $75.00 
Sorts 85K diskette in less than 3 minutes. 
Sorts 190K diskette in less than 6 minutes. 
COPSYS for cassette systems .... $14.95 
Copy and verify virtually any machine- 
language program. | 

GSF-SZK ane: S2kK: OISKs ot ee ss $34.95 
18 high-speed machine-language routines 
including high-speed in-memory sorts. 

Sorts a 1,000 element string array in 6 
seconds. 


PHONE OR CALL AND BROWSE. TRADE ENQUIRIES INVITED 
Trading Hours: 9am to 6pm Monday — Friday, 9am to 12.30pm Saturday 


All the above fine products are available at or can be ordered from: 


SOFTWARE-80, Shop 11/198 Moggill Road, Taringa, Brisbane, 


QLD. 4000. Phone: (07) 371 6996. 


SOUTH COAST COMPUTING SERVICES, 90 Worrigee Street, 


Nowra, NSW. 2540. Phone: (044) 24967 


THE BYTE SHOP, Colbee Court, Phillip, ACT, 2606. 


Phone: (062) 81 5011 


TANDY ELECTRONICS, Springets Arcade, Bowral, NSW. 2576 


Phone: (003) 31 8942 


H.S. ELECTRONICS, 104 Charles Street, Launceston, TAS. 7520 


WACB RADIO CENTRE, 129 Fitzgerald Street, Perth, W.A. 


COMPUTERWORLD, Gallery Level, Woden Plaza, ACT. 


Phone: (062) 81 1368 


BUNBURY BUSINESS EQUIPT, 40 Spencer Street, Bunbury, W.A. 


6230. Phone: (097) 211977. 


CISA MICROCOMPUTING PTY. LTD. 


159 KENT STREET, SYDNEY, NSW 2000. PHONE: (02) 241-1813. 


Orders under $100 add $2.00 p and p. 


Over $100 post free. 


For repairs and modifications to systems — send by carrier — you pay, we pay return carriage. 


This program, written on an Apple II 
is designed to help dentists provide 
patients with accurate quotes for 
proposed services. 


THe DIN ACs3, Chas. Less. OCS 
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Dental Calculator 


by Dr. J. Fisher 


The price of each service is initialized 


as a variable in lines 120 to 230 and the 
much used strings initialized in lines 


S28 INPUT 
iN = N+ M 

356 NEXT I 

z6@ FOR I = 470 2 

37 PRINT Has 1; S$: CH: F$ 
384 INPUT O¢T3 

396 IF O13 = @ THEN 430 
400 PRINT H$: PS 

416 INPUT M 
42GN=N+M 


436 NEXT I 


PRINT H#:i EF 
430 INFUT & 
466 PRINT >: FRINT " TOTAL CHARGES " 
4°6. FORT = 1-70 23 

436 IF Lets = @ THEN Sea 

436. FRINT Cellar" 2": 15 Sts AS; FS 
SHBG = LETs + AcT3 

216 GOSUB Sin 

2H R= fF + Q 


228 NEST 


746 FOR I =41 702 


a 


240 to 310. The program could be made 
to loop back to line 330 but as it stands 
now it has to be rerun for each patient. 


aa IF O¢T> = @ THEt 


~~ 
Ty 

re} 
mm 


268 PRINT OfToi" "i 1) S$: C83 FS 
S78 G = OCLs # CeId 

See GOSUE SAR 
GA R= Fo+ ff 

BH NEST 

Gla IFN: THEN- PRINT ti! "7 PS 
b2G = N+ F 

B26 GOSUB S88 

B40 R= RF + G 

Boh IF % = & THEN 72h 


668 PRINT as = "SES 


‘THe GOSUE She 


f2@ PRINT : PRINT " TOTAL: $">R 
?3@ END 

INT <Q * 188) -“ 186 

814 HTAB (28>: PRINT "$"5Q 


826 RETURN 


| LEISURE LINES = 


The Search for the smallest palindrome 
with an even number of digits attracted 
over forty replies. As usual the com- 
plaint was “Too Easy’, although I 
didn’t receive any analytical solutions to 
support this view. Instead I had the 
usual collection of program listings for 
computers, ranging from main frames, 
through micros down to programmable 
calculators. I’ll not be publishing any 
of them, but suffice to say the correct 
answer is 698896 — which is the square 
of 836. 

I made a draw for the winning entry 
using Sean Howard’s biased random 
number generator — which should by 
rights have awarded the prize to one of 


With J.J. Clessa 


his relatives. However, it seems to have 
hit a bug this time . . . unless Heather 
and James Eaton of Tasmania turn out 
to be very distant cousins! 
Congratulations to the Eatons...a 
Paper Mate pen and pencil set will be 
winging its way to you c/o the PO — 
let me know if it ever arrives. Mean- 
while it’s time to think of more dia- 
bolical problems — try this one for size: 


PRIZE PUZZLE 


This one is quite feasibly done by 
logical deduction — you_ could, 
however, computerise your efforts. 


A child’s cube has coloured faces. 
Five colours are possible — red, green, 


- BLUDNERS 


blue, yellow and orange. Three views of 
the same cube are shown here, and in 
each of the views the colour on the 
bottom face of the cube is not repeated 
on any other face. Which colour occurs 
twice on the cube ? 


Answers please on a postcard to Puzzle 
No. 7, Australian Personal Computer, 
P.O. Box 115, Carlton, 3053. All solut- 
ions must arrive by January 28rd. 


PRIZE FOR THIS MONTH 
This month I’m giving away a $20 
McGills Newsagency book voucher to 
the sender of the first correct card 
out of the bag — good luck! 


Quite a few readers were thrown into 
confusion by the ZX80 Breakout pro- 
gram. The problem lies in line 130, at 


between the 
should be a shaded square. And in lines 


the end, in fact; instead of a space 


inverted commas there 


140 and 320, there’s only a single space 
between the inverted commas. 
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OPTIMIZING TRS-:80 


EXECUTION TIME 


One of the main criticisms levelled against Tandy ’s TRS-S0 pocket computer is its very slow execution speed. 
Denis Andrews offers some ways of overcoming this handicap. 


The TRS-80 stands alone in its profes- 
sional role, having the flexibility of a 
computer with the size, immediacy and 
accuracy of a calculator. However, 
there will be many others like myself 
who will wish to explore its full power 
for satisfaction and amusement. 

For programs of more than a few 
lines, one is likely to encounter unex- 
pected delays much longer than the 


time required for calculation. The 
handbooks — which are excellent in 
most respects — give little guidance 


about this and are even misleading. 
This article sets out to provide the mis- 
sing information. 

One program is given to illustrate 
the points. The chosen problem is fun 
in its own right — to have the machine 
play noughts and crosses with variety 
and skill. This task stretches the 
machine’s logical and memory capacity 
to the full (and stretched the author 
too). My first solution took around 70 
seconds per move: opponents became 
impatient! The program below responds 
in five to 19 seconds, similar to a human 
player. This has the same logical struc- 
ture as the first idea, but is now geared 
to the strengths and weaknesses of the 
TRS-80. 


Strenths and 
weaknesses 


These terms are used in respect to tim- 
ing. The machine is remarkably power- 
ful and easy to program, but execution 
is slow. The programmer’s staple con- 
trol devices — FOR loop and GOTO — 
are the slowest to execute. The less 
familiar logic functions and arithmetic 
GOSUB provide faster control. The 
TRS-80 allows the construction of 
logic functions using the logic operators 
=>, <, >=, <= and <>. Such functions 
take the value i when true and 0 when 
false. The AND and OR operators 
don’t exist in its Basic but their 
function is performed by * and +. So 


(B>2)*(B<5) takes the value 1 if B lies 
petween 2 and 5, otherwise it’s 0. The 
familiar devices INT, ABS and SGN are 
extremely fast. 

Table 1 shows the execution time for 
most logical and arithmetic operations. 
These were calculated using a FOR loop 
and stopwatch, adding instructions in 
various combinations. The values are 
approximate and disguise marginal inter- 
dependencies. (Some are given below.) 
Times are given both in msec and 25 
msec units (bracketed). The latter unit 
aids rapid calculation of execution 
times, as the most frequently used 
words or word-pairs then have unit 
time. 

To calculate actual execution times, 
you need two further facts: 

1. Addresses are accessed by upward 
search through memory, starting either 
at the current line or at the first line in 
memory; the address defines which of 
these searches is made. GOTO is not 
costly if it names a current or following 
line, or line 1. The cost accrues if you 
have to jump back and thereby search 
through most of the program. Address 
searches run at about 450 words per 
second. FOR and GOSUB~ work 
differently: they leave an_ explicit 
address in an internal stack and no 
search is required for the return jump. 
2. Variables are also accessed serially 
but in a complex way. On the right of 
an assignment (fetch) A is fast and Z 
slow; on the left (store) the reverse is 
true. Trading A for Z makes a 16 msec 
difference. For subscripted variables on 
the right, there are two fetches (symbol 
and its reference); the time differences 
add. On the left, there are two fetches 
and one store; two cancel, leaving just 
the symbol, so (A) is fast and (Z) is 
slow. For practical calculation, reckon 
each symbol reference one unit, and 
brackets one or |” each (left and right of 
‘="). The choice of variable name only 
matters if frequencies of fetch and store 
are markedly different. The ‘flexible’ 
variables take no longer than the fixed 


ones: A(26) and A(27) take about the 
same time in any role, 

The time required to jump over most 
code is around 1/8 to 1/4 of the time 
needed to execute it! This makes the 
layout of long programs and their sub- 
routines absolutely crucial. All jumps 
should be forwards or to early addres- 
ses. If you need to jump backwards, 
create a logically unnecessary GOSUB — 
for the sake of its stacked address (eg 
L47 in the program). 

Stacked functions seem to occupy a 
fixed time; the fourth level GOSUB 
takes no longer than the first, and does 
not slow the earlier orders either. Like- 
wise for FOR loops. Unexpectedly, 
GOTO D, GOSUB D, A(D) are not 
Observably slower than GOTO 7, 
GOSUB 7, A(7), ete., when letter and 
digit correspond. One letter can be 
faster than two digits. There is no mea- 
suradle time added in respect of LET, 
STEP N or addresses, though presum- 
ably they must use some. 

The programs provided in the appli- 
cations manual have not been optimised 
in either space or time. Most of them 
have long jumps and make no use of 
the economical logic functions, the 
equivalence C=A(3), or the implied ‘*’ 
(which often saves a pair of brackets as 
well). 

In particular, subroutines are com- 
monly placed at the end, so that the 
whole program must be jumped to 
access them. The only references to lay- 
out (note 7 on the introductory page) 
gives the wrong reason for putting sub- 
routines at the start! It would of course 
be easy to rewrite the programs optimal- 
ly if one used them often. 


Useful devices 


1. If a result is needed in two forms, 
store it twice. Transformations of 
arrays are slow. (In the program A—I, 
J—R and T (by itself) represent the 
entire game. Two of these are redundant 
images, but transformation would be 
expensive in time and space.) 

2. Data can be packed (L.7, L.70) or 


6(1/4) 12(1/2) 25() 36 (1.5) 60 (2.5) 75 (3) 250 (10) unpacked (L.3) in one variable. Decod- 
SGN oY 3 ie GOSUBN | A Nee ing is slow, but the device allows much 
ABS =e implied* GOTON  GOSUB1 (each data to be preset. (L.71 is equivalent 
ie E ( 4 = on ‘ cycle) to 19 assignments +five IF statements.) 
ee = oH & N evels) ; Wi 

oe [st digit) THEN FUNCTIONS: sor ere ees ee SHINE Ee 
char, on LEFT of ASSIGNMENT (11) DMS (4) SIN (24) rr 

Z N (25) DEG (5) ASN (20) 4. Use IF X. . rather than IF X>5.. , 

) LOG (20) COS (24) saving 30 msec or more. 
‘ ( pie oe aoe) 5. Make use of the logic functions 
me Aer Coe; rather than IF when you can. This gen- 


N Z 
on RIGHT of ASSIGNMENT erally saves one address and one assign- 
ment. (L70 and 71 would be twice the 


size and run at half speed using IF state- 


Table 1 Approximate execution times, msec (bracketed, 25 msec units). 
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CALCULATOR CORNER 


ments.) 
6. Space saving also saves time; there 1:Z=Z+1:ACZ)=Y: IF UWLET Z=26:W=U:GOTO 1 
being less code to jump over. 2: RETURN 
7. Place subroutines so that they are @ | 4:¥=¥+97C58*#(V> 208): Z=V-INT CV/Y *¥+1: RETURN 
passed over as seldom as _ possible. 2: Y=1+INT LOG W:GOSUB 4:W=We1@A-INT Z:Y=INT CCW-INT W)#18) 
8. Loop structure is slow however . B: ASC(Y)="0" :X=-4 : 
accomplished. Write the inner loop(s) 7: T=18T+Y :ACY+9)=X:S=S+1: RETURN 
| in full if you have space (ends of L.9— 3:Z=26:IF JLET U=CX=K+L )+(X=M+P)+(X=N4#R): IF U=WLET Y=1:GOSUB 1 
1th. @/ 1@:IF LLET U=C(X=J+K)+CX=0+R)+C(X=N*P):IF U=WLET Y=3:GOSUB 1 
9. A fixed string of GOSUBs is appre- 11:IF NLET U=(X=J+R)+(X=K+Q)+(X=L+P)+C(X=M+0): IF U=WLET Y=5:GOSUB 1 
ciably faster than a FOR. . . NEXT | @| 12:1F PLET U=CX=J+M)+CX=NeL)*(X=G+R): IF U>=WLET Y=7:GOSUB 1 
| loop (and may use less space, too, up to 13:1F RLET U=(X=P+Q)+(X=L+03+C(X=N+J): IF U>=WLET Y=9:GOSUB 1 
| three cycles). @| 14:IF KLET U=CX=IJ+L)+CX=N+Q): IF U=WLET Y=2:GOSUB 1 
10. Use flexible variables for the ones 15:IF MLET U=(X=J+P)+C(X=N+0): IF U>=WLET Y=4:GOSUB 1 
that must be subscripted anyway. |@| 2S:IF OLET U=CX=M+N)+(X=L+R):IF U>=WLET Y=6:GOSUB 1 
Avoid them if you can. 17:IF QLET U=(X=K+N)+(X=P+R): IF U>=WLET Y=8:GOSUB 1 
11. A computation conceived as several | @ 
. . 34:°6":S=1:T=6:A$C31)=" I GO:” 
pete, ene aD ee ieee eae @ | DiFOR Z=1 TOS:ACZ+9)=1:A8(Z I=" .*:NEXT Z:INPUT "TOSS CB=YOU START): ” 


+X: IF XLET W=125:GOSUB 5:GOTO 47 
‘GOSUB S6:ASCY)="X":X=-1:GQOSUB 7: W=5#C1=T)+156*( 2=T )+13979*(5=T) 
‘GOSUB 5 


(L9--17 with B:1). 
12. Save the early addresses for the 
most-used subroutines and those which 


. 47:GOSUB 58:GOTO 47 
N ee it: ig @ | 5@:PRINT A$;B$;C$;"/" ;D$;E$;F$;"/" ;G$;H$;1$:A$(31);Y:IF -SEND . 
52: IF S>8 BEEP 3:PRINT “DRAW!” : END 
ous ts an e 54:GOSUB 56:A$CY)="X":X=-1:GOSUB 7:60TO 64 & 
S6: INPUT “YOUR X:";Y:IF -ACY+9 PAUSE “FULL”: GOTO 56 

CrOSSes ‘ 57: IF T>SRETURN e 
Space is too precious for REM state- | @| S9:IF CY¥=5)+CY¥<3 RETURN 
ments in the TRS-80. The following re- S9:IF T=SLET Y=Y-2*INT ( .5Y-.5):GOTO 63 
marks stand in lieu and indicate very | @| 6@:Z=Y/(5-T):IF Z=INT ZLET Y=Y-2:GOTO 63 e 
briefly how the program’ works. 61i:IF T+¥<>SRETURN 
L.34 — 47 Set arrays to +1 (no move), | @} 62:Y=3 @ 
mirrored “.”’ for display. Decide who 63:BEEP 1:PAUSE “TRANSPOSED. .“;Y:RETURN 
starts. Register first move. @| S4:IF S=3G0SUB 73-.1T:IF WGOSUB S:RETURN e 
L.4 — 7 Make random choice in range 65:G0TO 78 
1—Y. Select 1 of Y digits A(27)+. ° 67: W=9745-7Y : RETURN ° 
Record move: machine coded —4, 78: W=15#( 4=Y )+( 7=¥ )+46794( 1=Y )+79*( B= )+367*C5=Y ): RETURN 
“QO”: player —1, “X”. S = move no. 74: W=37#( 9=Y )+457*( 2=Y )+479%( 3=¥ )+357"(6=Y )+349*(5=Y ) : RETURN _ 
L.50 — 63 Display position and @) 78:IF S)4LET X=-8:W=1:GOSUB 9:IF Z)26G0SUB 6:S=@:A$(31)=" I WIN:” 
machine’s response. Read _ player’s RETURN - 
move. Transp ose first move? Traps @) 79:X=-2:W=1:GOSUB 9:IF Z)»26GOSUB 6:RETURN 
metries. : . 82:X=-3:W=-1:GOSUB 9:Y=Z-26:GOSUB 4:Y=ACZ+26):GOSUB 6&:RETURN & 
L.64—71,L.81,L.84-—88 Test for pre- 84: W=37¥CJ+R=-5)+19#CL +P=-5): RETURN ; ! 
see traps oe nO 6m 87: W=13*( (289=T )+(2B7=T ))+1346#( (256¢T )#(268T))+47*(213=T):RETURN | @ | 
ponse, (too far from victory or defeat 88 : W=476*( 158=T )+238#( 156=T )+2468*( 159=T ): RETURN 
for serial calculation), All wins, losses ‘INPUT V:END:REM -- DELETE LINE AFTER SETTING RANDOM SEED -- 


alternatives are coded, equivalents play- 
ed equally often. 
L.78 Test for immediate win; enter if 


any. 

L.79 Test for direct threat by player; 
counter if any. 

L.82 Test for empty squares, threats, 
double threats; select randomly within 
the highest level registered. 

L.9 — 18 Test each remaining move in 
the rows which contain it; X is criteri- 
on: —8(two ‘0’’)for win, —2(two “X’’) 
to counter, —3(“0”+“.’’)for threat. 

L.1. The inner routine — only succes- 
ful tests enter. Hits listed at A(27)+. 
If higher-level hit found, restart list and 
reset level. 

This program is capable of further 
speed optimising, eg by swapping vari- 
ables. A quite different approach might 
be better of course. The hybrid of pre- 
set and search seems necessary: a fully 
intelligent program could easily be writ- 
ten but would run extremely slowly. It 
also seems necessary to avoid duplica- 
ting symmetries. One refinement per- 
haps worth pursuing is to transpose the 
display instead of the move. My attem- 
pts to do this ran out of space, but only 
just. The listing here includes some 50 
redundant words, expended to buy a 
little speed when the more elegant 
solution seemed out of reach. A further 
70 words would secure the improve- 
ment. Any ideas? 
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DIALOGUES 


David Hebditch continues his series on the man/machine interface. 


Dialogue styles fall into two very broad 
categories, free-format and formatted 
(or structured). 

We will consider the latter next 
month and in this article I shall concen- 
trate on free-format interactions 
between user and system. Most commer- 
cial dialogues tend to be _ highly 
structured, using formatted screens for 
data-entry, multi-choice menus, query- 
by-example and so on. The general view 
seems to be that the structured 
approach increases the ease with which 
the dialogue can be learned and used in 
practice. 

There are no clear definitions which 
could help us to differentiate between 
the two categories; the boundary is very 
fuzzy. But essentially ‘free-format’ 
dialogues are those relatively free of 
syntax and formatting rules. The use of 
the word ‘relatively’ is important — 
nothing can be entirely free of restric- 
tions. Perhaps the key concept is 
concerned with providing the maximum 
amount of flexibility in the way in 
which data can be presented by the user 
to the system (and vice versa). This 
contrasts with the structured approach 
which aims at restricting possibilities. 

So different dialogue styles offer 
users varying degrees of freedom. To 
appreciate this is important; a dialogue 
has to be designed to offer its most 
likely users the level of flexibility with 
which they feel most comfortable. To 
provide a user with too many possibili- 
ties can be as disconcerting for him as 
offering too few. And, of course, users 
do vary in their needs; I am sure that 
after 12 years of working with inter- 
active systems of great variety, I am 


Flexibility 


More degrees 
of freedom 
Figure 1 Interactive Dialogues and Degrees of Freedom 
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happier with very open and flexible 
dialogues than the average first-time 
user. 

If ‘free-format’ dialogues are not 
being used too much in regular commer- 
cial applications, where are they being 
used? Well, when you type a Basic 
program into your TRS-80(or whatever) 
you are making use of a special-purpose 


free-format dialogue. The CP/M 
operating system also employs a 
relatively ‘free’ approach; obviously, 


syntax rules do exist but the program 
does not control your input on an 
individual item-by-item (or even 
character-by-character) basis. 

What are the various elements we 
need to consider in designing a free- 
format dialogue? These are shown sche- 
matically in Figure 2. Each is discussed 
individually below. 


Delimiters 

Because free-format input messages are 
entered as a character string, some con- 
vention needs to be employed in order 
to mark the beginning of one item (or 
field) and the end of the previous one. 
In many dialogues, a space may be 
employed for this purpose but this will 
obviously be ambiguous when text is 
being entered. Popular characters for 
use as delimiters are: 

*‘—’ hyphen 

> colon 

> oblique stroke 

)’ left and right brackets 

> equals 

point 

,. comma 

and so on. 


nw nw wn n n n 
e ia e"s 


Flexibility 


Less degrees 
of Freedom 


A number of factors condition the 
choice of delimiters: 
— avoidance of ambiguity 
— ease of location on the keyboard 
and 
— special usage (e.g. the comma used to 
separate items entered to a Basic 
INPUT statement). 
In many cases, a delimiter can be 
implied. For example, the 15th August 
1980 may be entered as: 
15.8.80 
using the point as a delimiter or as 
15AUG80 
using the changes from numeric to 
alphabetic and back again to differen- 
tiate the various sub-items. In some 
cases, a choice delimiter (e.g. ‘ — ’, 
*/? or ‘.’ in dates) might serve to make 
the dialogue more user-friendly 


Items 


The items which the delimiters frame 
may be employed for a number of 
purposes according to the function of 
the dialogue. Items usually contain: 
— commands 
— command parameters or, more 
usually, 
— data. 
Some examples will serve to illustrate 
this: 
PIP B:PROG1I.BAS=A:PROG2.BAS 
This is a CP/M PIP utility input line 
which means “Copy the Basic program 
file called PROG2 on diskette drive A to 
diskette drive B and rename it as 
PROG1.” A space delimits the PIP acti- 
vation command from the rest of the 
text. Colon (: ) prevents the drive desig- 
nators from being confused with the file 
names and the point ( . ) separates the 
file type subscript from the name. The 
equals sign ( = ) is more of a parameter 
than a delimiter and is best remembered 
as having the same functional meaning 
as in a Basic program. 

Another interesting feature in this 
context is that the parameters at each 
side of the equals sign have positional 
significance; they will not do the same 
thing if they were the other way around 
(quite the opposite!) If it is thought 
that the positional significance could be 
a problem, a solution could be the use 
of ‘keywords’. 

For example, 

PIP FROM=FILE2 TO=FILE1 
would mean the same as 


4 MENSA COMPUTERS 


PUY. 


Suite 3, 454 St. Kilda Road, Melbourne, 3004. Telephone: (03) 26-5683, 26-6150. 


FINDEX — The Real Computer 


THE WORLD’S FIRST PORTABLE MICROCOMPUTER 
Battery or mains operated 

RAM 48K to 2 megabytes, bubble memory to 2MB, gas plasma 
display, optional audio, printer, mass storage mini floppys to 
800K bytes, hard disk to 195 megabytes, acoustic coupler, 
S-100 bus, battery optional, CPU with real time clock. For 
dynamic businessmen on the move. Ideal for real estate 
agents, insurance brokers and accountants. 


SUPERBRAIN © 


SERIES 


BUSINESS 
SYSTEMS 


Priced competitively from as low 
as $45.00 p.w. lease cost includ- 
ing sales tax and software. 


Powerful, multi-purpose microcomputer systems. 


TYPICAL APPLICATIONS 


Debtors ledger and statements, creditors ledger and remittances, general ledger 
and trial balance, order entry/invoicing, sales analysis, payroll/wages, enquiry, word 
Processing, mailing, record keeping, ledger card, doctors office, real estate, agency 
accounting, hotel/motel accounting, branch office accounting. 

Facilities management consulting. 

Software and computer sales. 

Computer data preparation. 


MENSA G.F. 1000 

The Mensa uses a CPU 8080 and Z80 operating at 4MHZ. 64K bytes Dynamic RAM 
expandable to 2 MB with Bank select allowing multi-user. Texas Instruments 810 
Printer. Over 2 MB total 4 drives on-line storage bytes of unformatted data on two 
double density drives. Optional external hard disk storage can be connected using the 
optional S-100 Bus. Floppy Disks. 


WINCHESTER DISK 

26 MB of Winchester Disk 
complete with controller and 
easy backup. Disk has special 
capacity to only back up files 
accessed during the last 
period. 


Disk Operating System CP/M 


OPTIONAL SOFTWARE : 

— FORTRAN, COBOL, BASIC 

Application Packages: Extensive software development tools are available from leading 
software vendors, include software for the following applications Payroll, Accounts 
Receivable, Accounts Payable, Inventory Control, General Ledger and Wordprocessing. 
All modules mounted to base. CRT in a rigid aluminium frame. Disk Drive assemblies 
are mounted into special bracket for ease of servicing. 

Mensa Computers provide a service network throughout Australia at major service 
centre locations to minimise response time to service calls. To ensure that equipment 
will operate at peak performance, engineers and technicians are trained to ensure the 
highest possible standard of service. 
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Figure 2: The Elements of a Free-format Message 


PIP TO=FILE1 FROM=FILE2 

The use of keywords obviously 
requires more key depressions (and you 
have to remember the words) but where 
a lot of items could be entered in each, 
and only a small number are in practice, 
then the technique might prove to be 
more economic and reliable in practice. 
It is also a relatively simple matter to 
write programs for such formats (espe- 
cially if the Basic interpreter has an 
INSTR function). 

Free format dialogues can be very 
economical for simple data entry. For 
example, to add a new book to a library 
catalogue file one might type: 

0-87626-345-7/GILB & WEINBERG/ 

HUMANIZED INPUT/WINTHROP/ 

1978 
In this case, the only ‘overhead’ charac- 


SOF TWAR 


AUSTRALIA’S MOST 
COMPREHENSIVE 


CATALOGUE 
SEAHORSE 


supplies more than 
470 programmes from: 


g 


a Apple 


Looking for software that works? 


ters are the ‘ / ’ delimiters and no coding 
is employed at all. 
Another possibility is to type: 

ADD NEW BOOK TO 
CATALOGUE. ISBN IS 0-87626-345-7, 
AUTHORS ARE GILB & WEINBERG, 
TITLE IS HUMANISED _ INPUT, 
PUBLISHER IS WINTHROP, YEAR 
OF PUBLICATION IS 1978. 

This is an example of a natural language 
dialogue all of which are ‘free format’. 
Many system designers set out with the 
good intention of making _ their 
dialogues as much like English (or 
French, Dutch, etc) as possible. This 
however is much easier said than done; 
the programming problems alone are 
enormous. I shall therefore devote a 
special article to this subject. 

A programming technique cailed 


‘Finite State Automata’ is very approp- 
riate to handling free-format input data 
and I will write a special article on that 
topic. In the meantime, here is a check- 
list of points to keep in mind when 
designing free-format dialogues: 
1. Choose delimiters which are easy to 
locate on the keyboard (i.e. not in 
upper case). 
2. Avoid possible conflicts in the choice 
of delimiters. 
3. If there are any length limits on 
items, use prompts of some kind to 
guide the user. 
4. Place optional and/or least used 
items at the end of the message (so they 
can be ‘dropped off’). 
5. If the occurrence of items in an input 
message is low, use a keyword technique 
or split into a selection of shortened 
messages. 
6. Avoid formats which _ require 
awkward keying sequences for non- 
typists; try typical messages before 
finalisation. 
7. Keep the item sequence as close as 
possible to that in any related input 
documents. 
8. Minimize the ‘overhead’ characters 
and get the computer to use as many 
cursor/print head functions as possible. 
Next month I shall look at structured 
dialogues. 


MUSE / PROGRAMMA / MICROSOFT 
MICROSENSE / LIFEBOAT GEMSOFT 


for the APPLE CBM ‘PET’ TRS-80 SORCERER 
$1.00 inc. p & p refundable with order 
Please specify your computer. 
SEAHORSE COMPUTER SERVICES 
P.O. Box 47, Camden, N.S.W. 2570 
Old S. Rd. Razorback, N.S.W. 
Telephone: (046) 366 131 


software tron Micro- 
Educational 


Try micro-Educational. We’re very selective about what we sell. We like the repeat business. 
Our catalogue represents the ‘top 5%’ of US and Australian software. Here is a sample: 


Classroom computer package # 1. A complete curriculum authorising system on 2 disks. 
animated graphics, sound and tutorials. 16 page manual. 48K disk. $55.00 


A maths skills curriculum from Milliken Publishing. 12 disks. 650 levels. 1st to 
Extensively researched and professionally presented. 32K disk. $325.00 


Milliken maths strands. 


6th grate. 16 colour graphics. 


Spectacular 


CONFLICT. Roger Keating's classic intelligent wargame. Real time action with the challenge of chess. Spectacular graphics. 


32K disk or cassette. $25. 


Interested? Here’s the coupon. (P.S. If you’re quick we might even tell you where to buy aneap disks.) 
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Address 
Post now to: 


MiICRO-EDUCATIONAL, 17 Park Road, Garden Suburb, N.S.W. 2288 Australia 
SPECIALISTS IN CAl, EDUCATION AND ADMINISTRATION SOFTWARE 


PROGRAMS 


TRS-80O Tarot 


by Simon Williams 


This interesting program runs on a 16k 
machine. 


1@ RANDOM: CLEAR1 40: GOSUBS=20 

“0 DIML¢2, 10) :FORN=0TO9: READL (4, NI,L¢61,N)=NEXT 

TQ 7 te INFORMATION/ INSTRUCTIONS 

4@ CLS: PRINTAGES, "COPYRIGHT i968, SIMON WILLIAMS": FORN=1T01000: NEXT 

2@ CLS:PRINT"THE TAROT IS AN ANCIENT METHOD OF FORTUNE TELLING WHICH MAKES USE 
OF A PACK OF 78 CARDS. THESE ARE DIVIDED INTO TWO SECTIONS, THE MAJOR & MINOR ’ 

ARCANAS’. THE MAJOR ARCANA JIS A SET OF BE" 

E@ PRINT" PICTORIAL CARDS DEPICTING PEOPLE AND OBJECTS. THE MINOR ARCANA IS SIMI 

LAR TO AN ORDINARY PACK OF PLAYING CARDS WITH AN EXTRA CARD IN EACH SUIT, THE 

> PAGE’. THE FOUR SUITS ARE NAMED WANDS, " 

7@ PRINT"CUPS, SWORDS AND PENTACLES. THE MAJOR AND MINOR ARCANAS ARE SHUFFLE 

D TOGETHER AND DEALT OUT, FACE DOWN, IN ANY OF SEVERAL ARRANGEMENTS KNOWN AS ”’ 

LAYS’. THE CARDS ARE THEN REVEALED, UNE" : 

E@ PRINT"AT A TIME, AND READ ACCORDING TOeVHEIR INDIVIDUAL MEANINGS AND THEIR P 

OSITIONS -IN RELATION TO THE OTHER CARDS. I SHALL READ FROM THE TEN CARD OR ’C 

BETTE ROSS? hay. 

9@ PRINT" BEFORE WE START, J NEED TO KNOW SOME THINGS ABOUT YOU, IN ORDER TO ASSI 

GN YOU ONE OF THE COURT CARDS AS YOUR *SIGNIFICATOR’. ARE YOU MALE OR FEMALE? 
ANSWER M OR FF." 

102@ SS$=INKEYS$: LFS$<) "M"ANDS$<() "F"GOTOLNG 

11@ PRINT@SSE, "RARE YOU OVER 4@? ANSWER Y OR N —- PLEASE BE HONEST. " 

122 AS=INKEYS$: [FAS () "Y"ANDAS() "N"GOTO1L22 

13@ PRINT@SSE, "WHAT COLOUR 1S YOUR HAIR? A = VERY FAIR, B = GRAY, C = LIGHT B 

ROWN, D = DARK BROWN, — = BLACK"; 

140 H$=INKEY$: [FHS <() "A" ANDHS () “"B"“ANDHS () “C"ANDHS () "D" ANDH$ (2. "E"GOTO148 

150 AS=S$+AS: IFAS="MY"THENAS="KING OF “:Q=i14:GOTO1IS@ 

162 IFAS="FY" THENAS="QUEEN OF “:Q=12>:GOTO1S@ 

170 IFAS="MN" THENAS="KNIGHT OF “:Q=12ELSEAQ$="PAGE OF ":A=11 

160 IFHS="A"ORHS="B" THENHS$="WANDS" :H=64:GOTOZ1I2 

19@ IFHS="C" THENH$="CUPS" :H=50:GOTO2Z19@ 

290 IFHS$="D" THENH$="SWORDS" ?:H=S6ELSEHS$=" PENTACLES' :H=22 

210 CD(@)=A+H:CLS: PRINT@Z2@, "THANK YOU. YOUR SIGNIFICATOR IS THE "“AS$+HS". " 

220 PRINT"THIS CARD® IS PLACED FACE UP ON THE TABLE AND THE FIRST TWO CARDSOF THE 


~ LAY ARE PLACED ON TOP OF IT AS THEY ARE DEALT." 


£30 PRINT@SSE, "PLEASE CONCENTRATE ON ANY MATTER OF CONCERN BEFORE PRESSING THE S 

PACE BAR TO BEGIN THE READING. "3 

248 IFINKEY$<()" “THENR=RND(@) >GOTO24Q 

2£5@ ’ ++*READING 

£60 CLS: PRINT@22@, "THE FIRST CARD IS LAID ON TOP OF THE SIGNIFICATOR AND SHOWS T 

HE GENERAL SURROUNDINGS OF YOUR ENQUIRY. THE CARD I TURN UP IS ":GOSUBZ8O 

278 CLS:PRINT@A2Z22, "THE SECOND CARD IS PLACED ACROSS THE FIRST AND INDICATES ANY 

_ CURRENT PROBLEMS. FAVOURABLE CARDS MEAN SMALL PROBLEMS. I DRAW "“:GOSUBZE@ 

26@ CLS: PRINT@S2@, “THE THIRD CARD, WHICH INDICATES YOUR AIMS AND IDEALS, IS PLAC 

ED ABOVE THE SIGNIFICATOR. IN THIS CASE THE CARD IS “:GOSUBZ8O 

29@ CLS:PRINT@22@, "THE FOURTH CARD, PLACED BELOW THE SIGNIFICATOR, SHOWS THE BAC 

K- GROUND TO THE PRESENT SITUATION — WHAT LED UP TO IT. I TURN UP "“:GOSUB3&EO 

308 CLS: PRINT@320, "LEFT OF THE SIGNIFICATOR, THE FIFTH CARD SHOWS THE IMMEDIATE 
PAST - WHAT IS ’ BEHIND’ YOU. THIS CARD IS “:GOSUBZEO 

=1@ CLS?:PRINT@320, "THE SIXTH CARD, LAID TO THE RIGHT OF THE SIGNIFICATOR, SHOWS 

THEIMMEDIATE FUTURE - WHAT IS ’ BEFORE’ YOU. THE CARD DRAWN IS ":GOSUBZE@ 

220 CLS:PRINTAS29, "THE SEVENTH CARD, PLACED TO THE RIGHT OF THE SIXTH, SHOWS YOU 

R ATTITUDE TO THE MATTER. IF A COURT CARD IS DRAWN, YOU ARE SHOW- ING SOME OF T 

HE FEATURES OF THAT CHARACTER. I TURN UP “:GOSUBZ8@ 

=30 CLS:PRINT@SZ2@, "THE EIGHTH CARD, WHICH INDICATES THE ENVIRONMENT IN WHICH YOU 

"REWORKING, IS LAID ABOVE THE SEVENTH. I DRAW “:GOSUB28S@ 

240 CLS:PRINT@320, "THE NINTH CARD SHOWS YOUR HOPES AND FEARS AND IS PLACED ABOVE 
THE EIGHTH. THIS CARD IS “:GOSUBZS@ 

350 CLS: PRINT@S2@, "THE LAST CARD, THE TENTH, INDICATES THE FINAL OUTCOME OF THE 
MATTER — WHAT WILL BE —- AND IS LAID ABOVE THE NINTH. IT IS “:GOSUB38@ 


560 CLS:PRINT@454, “THIS COMPLETES THE READING. I WISH YOU GOOD FORTUNE. “:FORN=1T 


02000: NEXT 

378 RESTORE: GOSUBS3@: PRINT@S22, = END 

380 7 +++CARD/MESSAGE SELECTION & PRINT 

29@ R=RNDC156) :IFR) 78THENNS=" REVERSED" =? Ri=R-7SELSENS=""=FRi=R 

400 IFR1) G4THENRZ=R1-64:N$=" OF WANDS"+N%:GOTO0450 

410 IFR1) SOTHENRZ=R1—-SO-NS=" OF CUPS"+N$:GOTO452 

420 IFR1) S6THENRZ=R1-3ESNS=" OF SWORDS"+N$:GOTO450 

430 IFR1i) 22THENRZ=R1-225N$=" OF PENTACLES"+N$:GOTO458 

44@ RESTORE: FORN=1 TOR1+194: READNM$: NEXT = NS=NM$+NS:MMS="MAJOR" :GOTOGED 
45@ RESTORE: FORN=1TOR2+216: READNCS:NEXT=NS="THE "“+NC$+N$2MMS="MINOR" 
460 IFN1<1iTHENIFR=CDCN1 > THENN1=@: GOTOSS@ELSEN1=Ni+1 : GOTO4GEB@ELSEN1=@ 
478 CD¢(CN+1)=R: RESTORE :FORN=1 TOR+23@0: READTS=: NEXT } 

480 PRINTNS:PRINT"THIS CARD IS OF THE "MMS" ARCANA & IMPLIES “TS 

498 FORN=0TOS:SET(L¢@,N),LC1,N))2=NEXT:PRINTASE@, "PLEASE PRESS SPACE BAR TO CONTI 
NUE READING"; 

0@@ F=F+1i:IFF/15=INTCF/15) GOSUBS20 


51@ IFINKEY$="" "THENCN=CN+1i =? RETURNELSES@O@ 
520 IFPOINT¢€L¢@,CN),L¢€1,CN) )RESET(L(@, CN),LC1,CN)) = RETURNELSESET(L(@,CN),L¢1,CN) 
) = RETURN 


5338 74##TITLE GRAPHICS 

548 CLS: FORN=1T010: READC@, Ci,C2,C2,C4,C5 

55@ FORI=C@TOC1: SET C(I, C2) =NEXTI:FORI=C2TOC4G:SET(CI,CS) =NEXTIN 

5S6@ FORN=1TO6G=: READCO, C1i,Cz2,C3>FORJ=COTOC1 FSET (C2, J) SSET(C2, J) SNEXTJIN 

37@ FORN=1TO6: READC®, Ci, Cz, C2,C4 

56@ FORJ=COTOC1FSET(C2, J) >SET(C3, J} :SETCC4, JD =NEXTJI,N 

S9@ FORN=1T05S: READC@, C1,C2,C3,C4,C5, C6,C7, CS, C9, CA, CB 

600 SET(C@,C1):SET(C2, C2) =SET(C4, C5) tSET(CE, C7) ©SET CCE, C9) FSET CCA, CB) PNEXT 

610 FORI=Z6TG29:SET CI, 30) :SETCIS 35) =NEXT: FORI=82TO89:SETCI, 25) :SETCI, 36) NEXT 

620 FORJ=11TO1=:SET (4, JD 2SETCS, J) © SET (20,5) SSET C21, I) =NEXT 

630 FORI=71TO75:SETCI, 25) = NEXT SET (C91, 16) =FORN=1 T0150: NEXT: RETURN 

640 DATAGE, 59, 39,6, 27,18,46,49, 10, 22,47,11,16,17,123,6,15, 14,46, 52, 25, 44, 47, 26, 38, 

S3. 26, 56,57, 26) 76, 79, 24, 927, 95, 24, 78, 1,75, 98, 9%, 35, 92, 99, 15, 96, 141,16,105,111,17 
1105,1@66, 25, 112,117, 25, 103,113, 36 

65@ DATAI@, 15, 28, 29,14, 20, 26) 27,171 23) 24. 25) Fey 34, 221 23, 335, 35, 28, 21) 355, 56, 16,19 

660 DATAZ1, 34, 35) 36) 37> 24, 351 53,54, 55) 24, 56, 62,65, 64, 29; 53, 74, 75, 761 29, 33, 95, GE, 

97,9, 35,102,103, 184 

678 DATAZE, 29, 39, 29, 40, 26,41, 28, 42, 27, 43, 27,65, 26, 66, 28,67, 27, 68, 27, 69, 26, 78, 2E, 

76, 28, 77, 28, 78, 27, 79, 27, 8, 26, 1, 26, 90, 26, 91, 26, 92, 27, 92, 27, 94, 28, 95, 28, 68, 56, Sl 
> 26, 98, 36, 91,76,112,16,117,16 

660 DATAES, 7,62) 7162) 5; G2) 9, 58) 7) BGs 71 Ver 7s Ve Sr Vs 3 727 1 

&9@ DATATHE MAGICIAN, THE HIGH PRIESTESS, THE EMPRESS, THE EMPEROR, THE HEIROPHANT, T 

HE LOVERS, THE CHARIOT. JUSTICE, THE HERMIT, THE WHEEL OF FORTUNE 

722 DATASTRENGTH, THE HANGED MAN, DEATH, TEMPERANCE; THE DEVIL, THE TOWER, THE STAR, TH 

& MOON, THE SUN, JUDGEMENT, THE WORLD, THE FOOL 

71@ DATAACE, 2, 7,4,5, 6, 7,8, 9; 18, PAGE, KNIGHT, QUEEN, KING 

720 DATAEITHER THE NEED FOR’ OR THE SKILLS OF DIPLOMACY.,MYSTERY & THE FUTURE OR 
A WOMAN WITH PSYCHIC POWERS.,FRUITFULNESS IN ALL ITS ASSOCIATIONS. INITIATIVE.,; 

STABLETTY CIN sLIFE. THE AID OF A POWERFUL PERSON. 


COMPUTER BITS 


for Apple, TRS-80, Compucolor, 
Scorcerer etc. 

Disks $4.00 ($38.00 for 10) - 
16K Upgrades (200ns) $75.00 
or $130.00 for 2 
Apple lower case (Paymar) $75 
Computer solutions courtesy: 


MICRO-EDUCATIONAL 


17 Park Road, 
Garden Suburb N.S.W. 2288 
AUSTRALIA (049) 43 6805 


SENSATIONAL 
SOFTWARE 


from Creative Computing USA. 
Send for a free catalogue 
for complete.range of 
software available. 
Phd, P.O. Box 1107, Brunswick, Vic. 


OPPORTUNITY 


An excellent opportunity exists to join 
Sydney’s latest and most go-ahead 
personal computer centre. 


Applicants should have experience or a 
strong interest in microcomputers. 
The work will be varied and interesting, 
and salary will be negotiated according 
to age and experience. 


Applications may be made in person to 
P.A. Hatcher, 
75 Castlereagh Street, Sydney 
or in writing to 
P.O. Box 4715, G.P.O. Sydney, 2001 


PET Computer 
8 KBYTES 


Brand new unit 
$1050 
Contact D. Gillet 376-0225 (A.H!) 


489-8788 (B.H.) 


com 
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Deforest 
Software 


Spring in San Francisco from $950 


Lounge on Santa Monica beach, visit the first ever com- 
puter store or maybe even take a peek at Hollywood. Follow 
this with a few days in San Francisco visiting the Computer 
Faire and possibly pop down El Camino Real to Silicon 
Valley. 

Allthis, and much more can be yours if you take advantage 
of Travelaire Tours’ special offer to APC readers. The itinerary 
ensures that you are in San Francisco for the duration of the 
Faire, which must be the biggest micro-dedicated show in 
the world. 

The tour leaves Sydney aboard a PAN AM 747 to Los 
Angeles via Honolulu. After three days of ‘“‘doing your 
own thing’”’— including opportunities for car tours of Century 
City, the Beverly Hills Area, Hollywood and the Universal 


For further information and 
West Coast Trip, P.O. Box 1 
Tour Code: GV1 PA3 TRCF. 


Introducing the new 700 


connection are acoustically coupled. 


Operates 


The 700 Series can be ordered with an originate/answer facility 


VIC. A.D.E. (03) 543 2077. The Logic Shop (03) 51 1950 


WA W.J. Moncrieff (09) 325 5722. 


52 APC 


Attention computer users 


Electro Medical Engineering Pty Ltd proudly announce the release of their exciting new 700 Series of acoustic couplers. 
These low cost couplers are modular in design, simple to operate and offer unsurpassed performance even when both ends of the 


700 Series Originate 
Answer Acoustic Coupler 


Powered from the terminal or from a 9V plug pack 

Suits all computers or terminals with RS232 compatability 
Available with switch selectable answer/originate facility 
1200BPS Half Duplex models also available 

Communicate with others to exchange messages, programs etc. 
Set up your own data base service. 


authorities around the world. Don't send overseas for acoustic couplers. They won't give reliable performance and you'll be 
disappointed. Sendata acoustic couplers will outperform all others and they are available here in Australia. 


Electromeds eight years experience in the design and manufacture of 
acoustic couplers ensures premium performance. 


For further information contact your local representative:- 


QLD. A.D.E. (07) 350 2611. Management Technology (002) 34 4522 ACT. A.D.E. (060) 58 1811. Applied Data Control (08) 799211 


eLeECVROsN\eD ELECTRO-MEDICAL ENGINEERING P/L 


69 SUTHERLAND ROAD, ARMADALE, VICTORIA, 3143. AUSTRALIA. 


Film Studios — travel to Las Vegas where an inspection of 
computer use ina “‘multi-activity’”’ enterprise may be arranged. 
Two days later drive directly to San Francisco’s Mark Twain 
Hotel centrally situated on Powell Street. 

The holiday price includes all flights (from Suaiiea ), hotel 
accommodation and Avis car hire on a twin share basis 
throughout, and a detailed tour information booklet. 

Having said all that, this promises to become quite an 
event in the APC year; it’s bound to be fun — even for those 
who aren’t too interested in computers. They can make the 
most of San Francisco with its Golden Gate Bridge, cable 
cars, Chinatown, Fisherman’s Wharf — not to mention a 
more recent phenomenon, lobby watching i in the Hyatt 
Regency. 


a booking form write to: 
15, Carlton, Victoria, 3053. 


series Acoustic Modems 


at up to 300BPS Full or Half Duplex 


that has been designed to surpass the requirements of telephone 


NSW. A.D.E. (02) 848 8533. The Logic Shop (02) 699 4910 


TELEPHONE: (03) 509 5844. TELEX: AA36384 


PROGRAMS 


73@ DATARSSOCIATIONS WITH OTHERS AND PARTICULARLY MARRIAGE.,ALL FORMS OF LOVE 
ANDATTRACTION TO BEAUTIFUL THINGS, TRIUMPH ONLY THROUGH PERSEVERENCE @AND DOGGEDN 

ESS, THE JUST OUTCOME OF PROBLEMS. sf 

74Q DATACORRUPTION. OTHERS MAY TRY TO BETRAY YOU., THE FORCES OF LUCK AND THE 
REFORE SUCCESS.,A TIME FOR TAKING COURAGE AND ACTING ENERGETICALLY., INTUITION 
- YOUR OWN OR ADVICE FROM ONE WHO HAS. 

75@ DATATHE END OF A CYCLE OFEVENTS. CHANGE AND RENEWAL.,A NEED FOR ECONOMY @ GO 

OD MANAGEMENT., THE EFFECT OF EXTRA EFFORT. POSSIBLY VIOLENCE. » ADVERSITY & DISTR 

ESS. MISERY CAUSED BY CONFLICT. 

76@ DATALOSS BY THEFT OF MAT-ERIAL OR SPIRITUAL THINGS.,@ WARNING OF HIDDEN ENE 


MIES WHO WILL DECEIVE. ,MATERIAL HAPPINESS. CONTENTMENT THROUGH GOOD MARRIAGE. 
77@ DATACHANGE OF POSITION. RENEWAL QND REBIRTH. ,ASSURED SUCCESS VIA AVOYAGE OR 
CHANGE OF PLACE.,A TIME TO CONSIDER YOUR CAREER. CONSOLIDATION. 
78@ DATAPERFECT CONTENTMENT. ALSO FINANCIAL REWARD.,A TIME FOR GAIETY ANDRECREAT 
ION. PERHAPS GOOD NEWS. ; CRAFTSMANSHIP AND THENEED TO USE PRACTICAL GIFTS.,GIFT O 
R LEGACY. THE AQUISITION OF NEW POSSESSIONS. 
79@ DATAMATERIAL DIFFICULTIESBUT LOVE IS WELL LOOKED ON. , GRATIFICATION THROUGHG I 
FTS OR OTHER PLEASURES., INGENUITY IN BUSINESSAND MONEY MATTERS.,A CREATIVE PERIO 
D IN CRAFT OR BUSINESS. 
&@@ DATAPRUDENCE. SAFETY AND ACCOMPLISHMENT FROM THIS.,GAIN IN MONETARY OR FAMI 
LY MATTERS.,A TIME FOR SCHOLAR- SHIP OR REFLECTION. LOOK TO YOUR AFFAIRS., THE E 
FFECT OF SOMEONEWITH YOUR AFFAIRS AT HEART. 
&1@ DATATHE EFFECTS OF AN OPULENT THOUGH GENEROUS WOMAN. SECURITY.» INTELLECT 
AND PARTIC-ULARLY MATHEMATICS. LOOK TO BUSINESS. 
G28 DATAGREAT FORCE IN LOVE OR HATE. TRIUMPH THROUGH THIS.,CONFORMITY AND THE 
STABILITY THIS MAY BRING.,A FEELING OF LOSS OF SOMEONE OR SOMETHING., THE NEED F 
OR SOLITUDE. A TIME FOR CONTEMPLATION. 
S3@ DATALOSS OR DESTRUCTION OF SOMETHING CLOSE TO YOU.;A JOURNEY WHICH MAY INC 
LUDE TRAVEL BY OR OVER WATER., ANNOYANCE AT THE FAIL-URE OF A PLAN THROUGH DISAGR 
EEMENT., BAD NEWS OF AN ILL- NESS OR OTHER CRISIS. 
648 DATADEEP DISAPPOINTMENT POSSIBLY THROUGH DEATH.» PAIN AND SADNESS. ALLIS NOT 
WELL. . EXAMINATION. THE ABIL-ITY TO STUDY DETAILS NORMALLY MISSED.,SKILL AND BRA 
VERY. THE TIME TO USE SUCH VIRTUES. 
&5@ DATASADNESS OR EMBARRASS-MENT FOR YOU CIF FEMALE) OR A WOMAN CLOSE TO YOU.,T 
HE EFFECTS OF ONE WITH AUTHORITY TO MAKE DECISIONS. 
S68 DATACONTENTMENT WITH ALL. RELATIONSHIPS. ,LOVE AND PASSION. THEINTER-RELATION 
OF THE SEXES.,A HAPPY CONCLUSION. MERRIMENT AND FULFILMENT., TIREDNESS AND IMAGI 
N-ARY WORRIES CAUSED BY A STRICT ROUTINE. 
&7@ DATARECEIPT OF A GIFT. THIS RESULTS IN ANOTHER LOSS., REFLECTIONS ON THE 
PAST AND CHILDHOOD., IMAGINATION. A GOOD TIME FOR CREATIVE WORK THOUGH TRANSITOR 
Y.»DEJECTION OVER THINGSAS THEY ARE. THIS WILL PASS. 
68@ DATAR VICTORY IN SOmE- THING YOU DESIRE.» CONTENTMENT WITH YOURPRESENT SURR 
OUNDINGS AND THINGS AS THEY ARE., THE EFFECTS OF A FAIRAND STUDIOUS YOUNG MAN. HE 
MAY HELP YOU.;A PROPOSITION OR IN- VITATION. 
690 DATATHE EFFECTS OF A FAIRWOMAN. SHE IS DREAMY BUT VISIONARY., "THE EFFECTS OF 
a CREATIVE MAN IN BUSINESS, LAW OR THE CHURCH. " 
9@@ DATATHE BEGINNING OF NEW THINGS - CREATION. POSSIBLY A BIRTH., PHYSICAL SUFFE 
RING ORSADNESS. DISSATISFACTION WITH POSSESSIONS.; STRENGTH IN TRADE ANDDEALINGS 
WITH PEOPLE.,A HAPPY LIFE. PEACE AND PROSPERITY. 
91@ DATAIMITATION OR SHAM. A SUPERFICIAL VIEW. , SUCCESS IN UNDERTAK- INGS OR GREA 
T NEWS.,A NEED TO WORK BY DIS-CUSSION AND NEGOTIATION. FINAL SUCCESS. ,HASTE TOWA 
RDS A FAV- QURABLE OUTCOME. CHANGE. 
932@ DATADELAY CAUSED BY OPPOSITION TO YOUR IDEAS.,FINANCIAL GAIN BUT OPPO 
SITION IN LAW., THE INFLUENCE OF A DARK YOUNG MAN. HE MAY BRING NEWS. , DEPARTURE 
OR ABSENCE.A MOVE OR EMIGRATION. 
S3@ DATATHE INFLUENCE OF @ COUNTRY WOMAN WHO IS LOVING AND HONOURABLE., THE INF 
LUENCE OF A FRIENDLY COUNTRYMAN WHO IS HONEST AND CONSCIENTIOUS. 
94@ DATADISQUIET & A FEELING THAT ALL IS NOT RIGHT., THE PHYSICAL SIDE OF LOVE. P 
ASSION. A VERY STRONG CARD.,LIGHT AND TRUTH IN MATTERS. COMPLEX PROBLEMS REVE 
ALED., BENEVOLENCE OF OTHERSTOWARDS YOU. 
95@ DATAAN INCREASE IN YOUR UNDERSTANDING OF SOCIETY.,CERTAIN PROJECTS MAY BE F 
OOLISHL_LY THOUGHT OUT.,A DISPUTE. POSSIBLE LITIGATION.,A TENDENCY TO BIAS. WATC 
H AGAINST BIGOTRY. 
36Q@ DATAAN OVERCAUTIOUS ATT- ITUDE. THINK THINGS QUT — THEN ACT., ABUNDANCE OF TH 
& GOODTHINGS IN LIFE. ENJOY THEM.,QN ABUSE OF POWER THROUGH WEAKNESS. , OBSTRUC 
TION THROUGH SELFISHNESS. TAKE HEED. 
970 DATALETHARGY. INACTION COULD CAUSE PROBLEMS. , CONNECTIONS WITH THE CHURCH O 
R RELIGION LOOK WELL., BLINDNESS TO WHAT 1S RIGHT. PETTINESS., PROBLEMS CAUSED BY 
ARGUEMENT OR DISAGREEMENT. 
38@ DATAA TENDENCY TO ARRO- GANCE WHICH may CAUSE ALIENATION., INSTABILITY AND I 
N- CONSTANCY OF THOSE ABOUT YOU., CONTENTMENT ON MATER-IAL AND SPIRITUAL PLANES. 
938 DATAWEAKNESS THROUGH QAN OVERSIMPL_IFICATION (IF EVENTS., INERTIA OR FIXITY MAY 
CAUSE STAGNATION. ,FOLLY THROUGH FXTRA- VAGENCE OR FPLEASURE-SEEKING. 
1@@@ DATABAD INTELLIGENCE. THEEVIL SIDE OF WEALTH.,A FACADE OF ENJOYMENTTO KEEP 
OTHERS HAPPY.,MEDIOCRITY IN WORK. @ TENDENCY TO PETTINESS.,DELAY TO SOME PROJEC 
TDUE TO OTHERS’ OPPOSITION. 
1@1@ DATADISORDER OR CHADS. ITMAY SPELL RUIN FOR SOME PROJECT.,ENVY AND JEALOUSY 
WHICH LEAD TO ILLUSORY. DESIRES.,QUARRELS OVER MONEY OR POSSESSIQNS.,A TENDE 
NCY TO VANITY. THIS MAY STAND AGAINST AMBITION. 
182@ DATADECEPTION. BEWARE OF OTHERS KEEPING BAD FAITH. ,MONETARY LOSS THROUGHGAM 
BLING OR ROBBERY. TAKE NO CHANCES. , UNFAVOURABLE NEWS CAUSING WORRY., IDLENESS 
AND LACK OF ENERGY. STAGNATION. 
18358 DATASUSPICION AND MIS- TRUST MAY EFFECT YOUR REASONING., THE TEMPTATION OF 
VICE. WATCH FOR WEAKNESS. 
1848 DATAGREAT FORCE IN LOVE OR HATE. NOT TO THE GOOD.,LIES AND DISLOYALTY. BE 
WARE UNTRUTHS.,CONFUSION AND A FEEL-ING OF INTELLECTUAL ISOLATION. , PRECAUTION. B 
E CARE- FUL WHAT YOU DO. 
1@5@ DATALOSS OR DESTRUCTION OF SOMETHING CLOSE TO YOU.,A PROPOSAL OF LOVE OROT 
HER DECLARATION. PUBLICITY.,GOOD ADVICE FROM A WISE PERSON. TAKE HEED.,DIFFICUL 
TIES AND OPP-OSITION. TREACHERY. 
1@6@ DATASUSPICION CAST ON YOUOR A FEELING OF SHAME.», TRANSITORY PROFIT OR ADVANT 
AGE. MAKE HAY...,THE USE OF OBSERVAT- ION TO RAD ENDS. SPYING.,FOOLISHNESS. THE 
IN- ABILITY TO THINK SOUNDLY. 
1878 DATAA CLOSED MIND. WATCH AGAINST RIGOTRY OR DECEIPT.,A TENDENCY TO CRUELTYO 
R PERVERSITY. WATCH THIS. 
1@8@ DATADISCONTENT. THE DE- SIRE TO PUT RIGHT YOUR PROBLEMS.,LOVE AND PASSION. 
THEINTER-RELATION OF THE SEXES.,Q NEW VENTURE OR HOLI-DAY. ACHIEVEMENT FROM THI 
S.»NEW RELATIONSHIPS ANDA DELIGHT IN NOVELTY. 
1@98 DATATHE CHANCE OF NEW ALLIANCES. BUSINESS LOOKS WELL., THE CHANCE OF FRES 
H EXCITEMENTS. RENEWAL.,A DESIRE TO SUCCEED. YOUR FORCE OF WILL.,GREAT JOY AND 
HAPPI- NESS. A CELEBRATION. 
1188 DATALOYALTY OF OTHERS TO YOU. HONESTY AND GOOD ADVICE., INDIGNATION AT AN 
AFFRONT IN LOVE. A VIOLENT RESPONSE.,A TASTE FOR RISK COULD LEAD TO DECEPTI 
ON.,A TRICK OR FRAUD. BE ON YOUR GUARD. 
111@ DATATHE INFLUENCE OF A DISTINGUISHED WOMAN. DON’T TRUST HER., THE EFFECT O 
F A ROGUEOR SCANDAL-MONGER. HE IS DISHONEST. 
112@ DATAR FALL IN FORTUNE. RUIN OF SOMETHING ESTABLISHED. , SURPRISE AND WONDER 
LEADING TO DISQUIET., THE END OF TROUBLES. ADVERSITY 1S OVER. , PROSPERITY AND IN 
x, CREASE. AN APPRECIATION OF BEAUTY. 
113@ DATACONTRADICTION AND THETENDENCY OF OTHERS TO TRICK YOU. , APPREHENSION AND 
THE FEAR OF DEFEAT.,PERPLEXITY. EMBARRASS-MENTS AND WORRIES. » QUARRELS ARISING FR 
OMJEALOUSY OR ENVY. 
1148 DATAOBSTACLES TO YOUR IDEAS. POSSIBLE CALAMITY., DIFFICULTIES AND THE INT 
REGUE OF OTHERS AGAINST YOU., BAD NEWS OR ANNOUNCE-MENTS. INDECISION.,DISCORD. I 
NTERRUPTIONOF THE PRESENT STATUS QUO. 
115@ DATAPROBLEMS OF JEALOUSY - DECEIPT UR INFIDELITY.. “THE INFLUENCE OF A GOO 
D BUT SEVERE MAN. HE IS QAUSTERE, YET TOLERANT. “ 


MICROCOMPUTER 
SOFTWARE 


Proudly present the 


largest range of software 


in the world for the 
COMMODORE MICRO 
COMPUTER. 


‘““PETSOFT’’ 
‘Over 200 programs 


Including:- Over 40 


Business Programs Over 
65 Programming Aids & 
Tutorial Programs. Over 


60 Simulations and 
Games Programs. 


UATASOFT 


e Both cassette and 


disc based programs 


available. 


e No hassle 
guarantee - if our 


programs don’t load, 
we will replace free 


of charge. 


e Write or phone 


now for our fabulous 


free catalogue. 


139 Guildford Road, 


DATASOFT 


MAYLANDS W.A. 6051. 


Tel: (09) 871 7169 
Agents required all 
States. 


APC $3 


PROGRAMS 


PET Bloobers 


by Richard Warner 


Here’s a fascinating — hypnotic, even — game for the PET. It includes instructions and details on converting it to run 
on old ROM machines. 


& 18 REM ® Sia S=S4+1:P= Siar ‘RS = 

ti FEM N.E. ALTER LIME iif To CHANGE Sra [FPPEERK CP oc>Sa2THEMeaa & 
@| 12 REN SCREEN Size. 3 @) 26 T=INTCRNDCIIt1. 5 

tt FEM H IS SCREEM WIDTH - MIN=2.MAR=Se Sd [FR=ATHEMS Ta 

i4 REM i TS SCREEN DEPTH -— MIH=s.MAS=es & SSa@ C=C-—T: [FCIGTHEMCHC+4 & 
@ | iS FEM EAD SUBSCRIFT ERROR MAY! OCCUR Sea GOTOSSe 

i6 FEM OW OLD ROM MACHINES IF HeVosie. ari C=C+T: IFCSHSTHEMC=C-4 

{a0 PSC: T=k S=FNDe-TI? @| S86 IFT=2THENF=1-F =e 
ss 118 H=Se VW=te S38 GOTOSGe 

128 TRSS27eS+INT o13-He2 1 +4Qe INT Levers @ | 288 TEPSPcg THEN? ae @ 
@ | 126 PSsTF+H+1 616 GETS$¢:I1F2$=" "THENSGe 

148 PS=TP+'#46+48 Be S=5-1°P=Pes3 

158 P4=TR+41+H+!/ #40 & Bsa TFT S3=8THEHe 38 & 
@) ise In=166 e40 R=t-RiCSo: [FR=1 THEME? a 

161i REM OLE ROM IHW=315 B96 CH=Ch¢Ss-1: IFCIETHENCHC+4 e 
@ | 182 REM HEN ROM’S IN=166 @ | 65 coTdese 

{7a Sh=Hel-1 BFPO CHCh¢So4+1: IFCOSTHENC=C-4 

171 FEM CLO ROMS CHL: IFSSPeSSTHEMS sae @ | ees T=8: IFPEEK CP +000. Roo =s2 THEN Soe & 
ae 138 BOSE 1 aaa aie S| PORK EF. oe {OTE iB LI 

SHS TIE Cas iiss Po 7 Be T=CECB3 > TF T=8THEHG1& 
@ 218 FORFH=ATOS: READE C Rs. DCF. os, T8F. 13 & ria IFR=GAND T=—10RT=3 “THEME IE a 

ie Fag yo | ce real TFR=1AND¢ T=-SORTH1 > THEME 1E 

258 DATASS. 1.44 s rou T=TI°F=8 & 
og 26H DATArS. 44. -1 Tee GETS#: IF E#>""THENSae 

2b UA PAP Ss rra IFTI-T<6@67THEN 6a 

268 DATARS. —48, 1 @ |) s06 S=5-1° POKER S9.32 @ 
& 29 DIM 6353. RASess hoy org Sater! ood pelea B18 FORFSHTOS8 : NENT 

ZA PRINT! Bee TF S=87HEM46u 
& S18 FORFSTFTOFS:POREF. if2:HEXT J So TFRPEEKR CIN®o=80RF=87HENSaa S 

S26 FORF=TFTOPSSTEP4S: POKEF. 1a@2° HEST B46 P=PCS)  RSReNCS9  CaChc S39 ° 7T=1-° G0TOSee 

S28 FORF=FSETOP4S5 TERPS: POREF. 182: HEXT & 1Q@00 PRINT": TAR i503" aBLOOBERS A! & 
2 248 FORF=F2TOF4:>POREF. 182: 4ExST 168i FRINT" ELOOBERS RAWDCMLS GENERATES FATTERWS"” 

$68 CH=IHNTiRHDS 1 #45 128 FRINT"ON THE SCREEN. 

416 R=INTCRHiiciat, Sa & ese FRIHT"S IF ‘OU. GET EBURED. FRESS THE SPACE EAR" 6 
& $26 FP=TR+INTc Rb 1 se@¢H-23 30 +46e INT CRHDG 1 ev oa seco 1646 PRIMT"ANDT THE FATTERHW WILL BACK TRACK UNTIL” 

$36 IFFEEK CP 3<>32THEN426 & 1856 FRINT"YOLE TARE TOUR FINGER CFF." & 
ae 440 ITPPEERCPS0CC, G29 22 300R PEER CP+D 00. 1 oo cD S27THENMA SS Taba PRINT" alee PRES ANY REY TO- Ga” 

450 S=8:7=6 18° GETS$: IFet=""THENLare 
& SAG POKER. Cics (Pe SssP TEC Sos Re Coosk Cee Sof & 1858 FETURH & 


PEEK and POKE forApple Pascal 


by Stephen Withers 


Apple Pascal provides routines to con- 
trol all the standard Apple hardware but 
controlling additional devices can be a 
problem. For example, the communica- 
tions card initialises to 300 baud but 
should you want to use a 110-baud 
Teletype then you’ll have to load the 
ACIA’s control register with the appro- 


priate value. Instead of writing a routine 
to do just this, why not make it as 
generalised as possible by adding a 
POKE routine? It’s then only logical to 
complement this with a PEEK facility. 
Just a couple of notes to accompany 
this listing: using macros in such a short 
listing is obviously unnecessary but the 


Pascal Editor allows such items to be 
copied into a program from a library 
file; if the value to be POKEd is higher 
than 255 then the high order byte is 
ignored; the printer used to produce 
ns listing reproduces the character 
64-9 as ‘£?. 


+EQUIVALENT TO BASIC’S PEEK, AND 

.MACRO FOF ;SAVE TWO BYTES FROM STACK. THE : ; ee eee sae sear 

& PARAMETER MUGE BEA AEE PACE 0 eo ee ee ee en eee ee ee eee ® 
ADDRESS, USEFUL FOR SAVING A SUBROUTINE’ S |@ & POP RETURN ‘SAVE RETURN ADDRESS @ 

@ | FLa RETURN ADDRESS, DISCAR ‘DISCARD STACK BIAS 

STA #1 @ @| Por ALILIF: *GAVE ADDRESS PARAMETER e 
@)| FLA LDA £0 +MSB OF RESULT , 

STA H1+1 ° @ @| PHA + IS ALWAYS ZERO '@ 
@| .ENoOM TAY +ZERO. Y +OR DUMMY INDEXED ADDRESSING 

: : : ry @| LDA GADUK, Y;GET CONTENTS OFLOCATION REQUESTEL|@ 
@| .MacRO PUSH +THE COMPLEMENT OF FOP PHA »SAVE LSB OF RESULT 

LDA £141 e @| PUSH RETURN PUT ADDRESS RACK ON STACK & 
@ | FHA RTS ;ALL DONE! 

LOA £4 . 
@| PHA eo (|e. ® 
ol ENLIM @| |@| .PROC FOKE,? & 

.MACRO DISCAR +DISCARD 4 BYTE STACK BIAS e S SEQUIVALENT TO BASIC’S FOKE AND 2 
@/ Pia + PROCEDURE POKE (ADDRESS, VALUE: INTEGER); 

PLA : 
@| FLA ad 2 RETURN +;SAVE RETURN ADDRESS e 

FLA & e +THAT’S THE BYTE WE WANT & 
@| .ENDM *+SAVE IT 

; & & ; IGNORE HIGH RYTE OF VALUE r 
e|; | ADDR *GSAVE ALIORESS PARAMETER 

+ALLOCATE SOME STORAGE SFACE IN FAGE © e e £0:DUMMY INDEX FOR INDIRECT ADDRESSING ° 
@ | RETURN »EQU Q 

ALILIR » EQU 2 ® e ;GET LOW BYTE OF VALUE FARAMETER ® 
@|: M@ADDR,+Y +00 THE POKE 

Is e e RETURN +;RESTORE RETURN ADDRESS e 
@). FUNC FPREK+ 1 ;AND FINISH... 


PROGRAMS : 


PET Demolition 


by P L Brown 

@| { READE: IFAOTHENS @) i200 PRINT RPOINTS: "P" HIGH SCORE"HP" & 
< - are AlaLedeadeTeleleQeTeleledeDeleledeledeelele)" : GCTOSG 

® $ FORL=63270878 ‘READX :POKEL. X :NEXTL @| 2008 FORB=32887TOPE+1STEF-1: POKER. 31: NEXT @ 
e eanners 2001 FORE=87T0160:FOKEPE. 32 
Be aoead @| 2218 POKERE. 224: POKESS 484, B/NEXT 

@| 5 N-S9464 : POKES 9467. 16: FOKES9466, 1 :POKEN, 1:R=0 Sie bo it ious ey ad 
18 TI$="GGO0GO" = T1=7AG:D=4G: PRINT " TSaDMMOMTedeeDeTeDaOeDee" aoe IN) eee ee 

eR sans ae eee 2040 525, "WOLUR SCORE IS"P 
11 Bi=33489: B2=33526 ch pt et Ria aes aneete A Se k LS a & 
Ot i ae 285@ IFP=>HPTHENHP'=P PRINT" SSBRBBBITT IS THE BEST SCORE — 
13 FORB=B1TOB2 RT aed Ne aes : 

@ | 14 POKER, 208: NEXTE: B1=B1+40: B2=B2+40) :NEXTBB @ | 2060 PRINT" ORBRBBBBBITHE BEST SCORE IS"HP sd 
Resor Sa See EYLTE TU OMEUCLSs (COREES aonan tases 2678 PRINT" a To FLAY AGAIN FRESS ANY KEY M 
30 T1=7GG-(P/2)  ASINT¢ C1 GG #RHDC1> > | FORPE=32848T032888 aE EE, : : igual 

IFFEEK (PE) =2@8THENZOGG @ | <o¢2 PRINT’ St bepITO END THE POM PRESS “E* " @ 

@ oa: NEXT: IETI >T1THENGOSUB 100 2086) GETAS: IFAS="" THENZB&@ 

32 POKESZ387. 31: POKESZ84?. 32 e meee P=5-coTo3 Hee ° 
$6 IFASS1 THENX=32869 : M=1. bce : 

e 5a IFADSG@THEt x=32846: :Me= 1 3508 FOKES F4G3 . 2: PRINT"S)" > FORA=8TOZ2 

@ | 82 POKES, 42:POKEN-1, 32: POKEN#1 32 eo; PRINT" TITTY : ® 
7O GETAS fe tah hes A 
Oe Tipe eee TuENTAGD 4000 PRINT" HAMeleda" SPC C1495" DEMOLITION " 

See eoae @ | 4816 PRINT’ MMO"'SPCC1195" BY PETER WRIGHT 
GG IFA¢=""THENPOKEX, 32: GOTOZO <0 ae Ae 

. a ate — wires 4106 POKESS409,60:FORASATO3@00:NEXT fe 
160 IFMD328 32M SGOG PRINT "rTalaledeleledeleletete DO YOLl NEED INSTRUCTIONS 2" 

@| iis IF oS2846THENPOKER. 3 aan @ | Saia GETAS: IFAS=""THENSG1G : e 
acnsees S826 IFA¢="N" THENRE TURN . 
ae ae @ | 5836 PRINT"MTHE OBJECT OF THE GAME 15 TO DEMOLISH" Ps 

@ | nia IFFEEK CX) =208THENFOKEN-D. 32: POKES SG4G PRINT"ATHE WALL AT THE BOTTOM OF THE SCREEN, " 

PACS ed SSG PRINT"NTHIS IS DONE WITH THE “#7. ee 

Se ae OS @| G60 PRINT"NTHE ‘SPACE’ KEY IS USED TO FIRE THE “#°' & 
Zea JE eas COS TNE ON errare 32: POKEN, : Sava PRINT" MAT THE WALL. " 

_ SSS FORL=8TOSG0: NEXT : POKEN, 1: GOTO38 @ | 508 PRINT"MTHE WALL WILL ADVANCE AND IF IT" 

@ | 286 FOKEX, 42 :POREN—D, 32 GOTO2HO - S@90 PRINT"MGETS AS HIGH AS THE ARROW ON THE RIGHT" ® 
SQ READDA: IFDA=GTHENRESTORE K=255 POKEN. 1: GOTO1Z00 600 PRINT" MOF THE SCREEN IT IS THE END OF THE GAME. " 

S18 IFFEERK¢X-DAS=26STHEWF= site Pk: EX-DA; Be: POKEN.K:K=K-S: S 6H@2 FPRINT"THE STOP KEY HAS BEEN DISABLED AND" e 

& GoTOSEE 6802 PRINT"MTHE “E’ KEY MUST BE USED IN ITS PLACE" 

536 cOTOsaE see PRINT" Ma PRESS AN! KEY TO PLAY 
@ | 284 DATA-40.-1.1.39.41.42. 38,983.82. 78. 77.124. 123 @| ca2a GETAS: IFAS=""THENEO20 S 
117,116,165. 164,156, 155 663 RETURN 
301 DATAZHS. 205.195.154.245. 246.295.234.235. 247.6 POBE PUKESI4677. & POKESS466, &: FOKESS464. &  SY'SCS45> 

& {ao R=R+1: [FROTTHENLESe ® 3601 DATA126. 163.99.141.25.2,169,3.141,26,2. 88,56, © 
161 PRINT: T1$="GOGG80" : RETURN 120, 169,133,141, 25,2, 169,238 

@| 1856 IFR?13THENR=0 we @) s002 DATAI41.26.2,88,96. 169.0, 72,72. 72, 72,76. 133, = 
1106 PRINT: FORRR=337 297033766 23H, 32,98,3.234,169,255.141,9 

@ | 118 PORERR. 208 NEXT: TIS="G08 G0" : RETURN @| 3083 DATAZ. 76,126,230 ® 


Superboard/ UK101 Bug bypass 


Officially , to associate a character string 
with a number, it is necessary to set up 
a string array and fill it via the usual 
READ and DATA statements. The dis- 
advantages of this approach re 
twofold: first, the text appears twice in 
memory, and second, there is a bug in 
the garbage collection routine which 
causes these machines to hang up very 


by Roger Derry 


easily when string arrays are used. 

This program demonstrates a way of 
accessing the individual DATA state- 
ments without using string arrays. The 
secret lies in the fact that locations 143 
and 144 contain the address of the next 
DATA statement. It becomes a simple 
matter to READ through the DATA 
list loading some or all of the DATA 


addresses into numeric variables. If 
these are subscripted then the addresses 
may be manipulated just like string 
variables . but slower and .using less 
memory. By POKEing 143 and 144 
with the er Pear values DATA 
can be READ in any sequence, even 
backwards. 


100 
110 
120 
125-°: 
1°46 

27 REM INITIALIZE NUMERIC ARRAYS 
18 . 

130 DIM 017+1)>M(12,1) 

b De fs ae 

137 REM D= DAYS OF WEEK 
136-3 

140 FOR xX=1i TO 7 

150 0¢X,0)=PEEK(143):0(X,1) =PEEK (144) © 
160 READ At 

170 NEXT 

BAS: 4 

180 FOR X=1 TO 12 

190 M(X,0)=PEEK (142) :M(X)1)=FEEK(id4) 
200 READ A$:NEXT 

201 : 

205 
PLO 


Pag os 


REM FROGRAMMABLE RESTORE DEMO. PROGRAM 
REM ROGER DERRY 
REM JULY 1980 


M= MONTHS OF YEAR 


FRINT" ENTER © 
INFUT “ENTER DAY 
IF &20 THEN 2000 
LF Dt OR TI) 7 THEN 


Pee SP) a 
e 


225 INFUT 


€. 2. a 


(1-7) "sD 


220 


210 


“ENTER MONTH (1-12)"3M 


TO PRINT MONTHS BACKWAROS OR 


@) 230 
Zc = 


240 
200 
205 
260 
270 
212 
280 
290 
300 
301 
1900 


1010 
1020 


1500 
1501 
2OQ0 
2005 
2O1VO 
2020 
2030 
20:40 
POEL) 
2040 


POKE 143,0(0+0);:POKE 144,0(D,1) 
READ Ds 


FOKE 143+M(M)0)+POKE 
READ M$ 


PRINT: PRINT: FRINTDS>» i1% 
FRINT: FRINT; GOTO 


a 
? 


LO 3310s ORM 12 STNEN:'F 2S 


i¢4,)M(Ms1) 


210 


DATA SUNDAY» MONDAY» TUESDAY» WEDNESDAY, 
THURDAY» FRIDAY» SATURDAY 

DATA JANUARY» FEBRUARY» MARCH» APRIL: MAY» JUNE 
DATAJULY» AUGIUST» SEPTEMMERs OCTORER, 
NOVEMEI-R+ DECEMBI-R 

PRINT: PRINT:REM FRINT MONTHS KRACKWARLIS ! 
PFOKE 16%30:REM ‘SET WIDTH FOR COMMA SPACING 
FOR X=12. TG:.1 STEP’ -1 

PORE 143+M(X+0):POKE 144+M(X,1) 

READ M$: PRINTM$; 

NEXT 

PRINT: FRINT: PRINT 

Got 21.6 


APC 55 
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game is to cause the right chain 
reaction to wipe out all your 
opponent’s. pieces. Nuclear 
Reaction is a game of skill, fast 
decisions, and quick reversals, 
making it fun to play for many 
hours. Action sounca effects. 


2. Dodgem 


In Dodgem, two sets of pieces 
move at right angles across a 
checker style board. The object 
is to move all your pieces across 
the board and off the opposite 
edge. One player moves from 
the bottom to the top while the 
other moves left to right. You 


Ss Es bed 
GPEER'S MOWE CHOR VERT) 


1. Nuclear Reaction 


TIME=14 


Nuclear Reaction 1s an | 
exciting strategy game for two May play Dodgem against the 
players. Each player, in turn, APPLE or a friend. Six board 


places a particle of radioactive SIZES and action sound effects 


material on a 6x6 board. When 
the number of particles at a 
location reaches its. critical 
mass, it explodes, sending a 
particle to adjacent squares. As 


3. Dueling Digits 


Do you have a good memory 


‘Brain Games-1, CS-4004 (16K) 


presents a digit and tone, then 
erases it. You then type in the 
same digit. After each turn, the 
computer. repeats -all the 
previous digits and adds a new 
One, and you try to type in the 
entire sequence. The round is 
over when you make four 
mistakes. For up to four players. 
Two skill levels. 


5. Midpoints and Lines 


These two colorful graphics 
demonstrations will run 
continuously. Great for store 
displays, parties, and showing 
off your computer. 


6. Tones 


This program allows you to 
make your Own music and 
sound effects with the game 
paddles. One paddle controls 


4. Parrot 


Parrot is similar to Dueling 


the board fills up, a single forsequences of numbers? Play Digits, but you try toremember _ the pitch of the tone, the other 

explosion can cause long chain Dueling Digits and find out. In sequences of letters and tones controls the duration. No 

reactions. The object of the this game, the computer jnstead. Two skill levels. Special hardware is required. 
Sorcerer 3. Nuclear Reaction 


Graphics Games-2, CS-5001 (8K) 


.TETUDE 9465 
VELOCITY -4156.4 


=a 


44. MPH WIND TO RIGHT 


1. LEM 


In this graphic version of the popular real time lunar landing 
game you must land on the moon's surface with the lowest possible 
velocity. You can control the thrust of your retro-rockets with the 
number keys but you have a limited amount of fuel. The automatic 
pilot option can be activated and deactivated with the keyboard. 
You take a walk on the moon and plant a flag if you land 
successfully. 


2. Pie Lob 


This is a game in which two players lob pies at each other across 
a computer-generated hill. You choose the angle and the strength 
of the throw and then watch the trajectory of the lob across the 
screen. The computer changes the terrain and the wind speed in 
each game. Pie Lob makes good use of SORCERER'’s graphics. 


Graphics Games-3, 
CS-6001 (8K) 


1. Tank Attack 


Maneuver your tank around trees, houses and airplanes to 
destroy enemy guns. The guns fire back, and sometimes you get 
the distinct impression you have been lulled into a sense of security 
before getting blown up. A challenging real time game written by 
one of our most vicious programmers. 


Nuclear Reaction is an exciting strategy games for two players. 
Each player, in turn, places a particie of radioactive material ona 
6x6 board. When the number of particles at a location reaches its 
critical mass, it explodes, sending particies to adjacent squares. As 
the board fills up, a single explosion can cause long chain 
reactions. The object of the game is to cause the right chain 
reactions to wipe out all your opponent’s pieces. Nuclear Reaction 
is a game of skill, fast decisions, and quick reversals, making it fun 
to play for many hours. 


4. Bounce 


Bounce is an intriguing graphics demonstration which traces the 
path of a ball as it bounces around the screen. 


5. Checkers 


The SORCERER matches its strategy against yours in this 
popular game. The computer does not look more than one move 
ahead, hence the game is best suited for beginning players. 


6. Dodgem 


Dodgem is played on a checker-type board against the computer 
or another player. The object of the game is to block your opponent 
to slow him down. One player moves pieces from the bottom of the 
board to the top, and the other player moves from left to right, 
trying to get all the pieces off the board. This is achallenging game 
of strategy. 


2. Dodgem 

Dodgem is played on a checker-type board against the computer 
or another player. The object of the game is to block your opponent 
to slow him down. One player moves pieces from the bottom of the 
board to the top, and the other player moves from left to right, 
trying to get all the pieces off the board. A challenging strategy 
game. 


3. Free For All 


This game started as a joke, but it’s for real! Two people compete 
against each other and the computer. A submarine, a destroyer, 
and a plane, criss cross the screen. Each may fire at the others. Free 


For All makes extensive uses of ithe Challenger’s graphics. 


4. Hidden Maze 


In this game, two players (you, and the computer or a friend) 
compete to be the first to reach the opposite side of the maze. The 
maze is hidden at first and is only revealed as you run into parts of 
it. Swinging gates add an additional challenge to this game of 
memory and skill 


Pursuit Games, 
CS-3004 (16K) 


e Stock Car Race 


Stock Car Race is a real time racing 
game on a road race circuit. Your high 
speed racer is controlled by the “arrow” 
keys, as you shift up and down through 
four gears. Take the turns slowly, “floor 
it” on the straights, but don’t blow your 
engine! 


Maze for the Level Il 16K machine is a 
high speed pursuit game. You are timed 
throughout your run and rated on the 
basis of elapsed time and the number of 
moves required to escape. A different 
maze every time. Nine skill levels. 


e Indy Racer 


Indy Racer is a real time racing game 
for the TRS-80. You’re in the driver's 
seat of a red-hot Indy car, changing 
gears and weaving around the track as 
you pass your competitors. Indy Racer 
is similar to the popular arcade-style 
driving games. 


¢ Depth Charge 


As commander of a destroyer, your 
mission is to destroy as many enemy 
subs as possible. Move your ship back 
and forth on the water, positioning 
yourself over enemy subs as they cruise 
into range. Depth charges sink slowly, 
so timing and position are important in 


Strategy Games, 
CS-3005 (16K) 


e Tunnel Vision 


You are transported into a massive 
labyrinth and must find the exit or be lost 
forever. This is an excellent example of 
three dimensional perspective using TRS- 
80 graphics. 


® Evasion 


In this real time game, you are pursued 
around the game board by an evil-looking 
snake. Variations of play include two 
different speeds and hyper-jumps which 
randomly relocate you on the board. 
Looking for an escape? Try Evasion. 


° Jigsaw 

Jigsaw is a computer-age puzzle game 
making extensive use of TRS-80 graphics. 
The computer generates a randam puzzle 
and puzzle board. Using a combination of 
deductive reasoning and luck you must fit 
the graphically represented puzzle piece 
into place. 


e The Masters 


Are you a wandering pro or just a 
Sunday golfer who would like to keep in 
practice? Once you're on the green, a 
worm's-eye view is displayed for putting. 


e Motor Racing 


Motor Racing combines real time 
racing action with advanced graphics 
functions. The graphics and animation 
make Motor Racing fun to watch as well as 


play. 


Space Games-3, 
CS-3002 (16K) 
e Ultra-Trek 


Ultra-Trek is a fast-paced version of 
Star Trek, complete with “real time” action 


Text Processing, 
CS-3302 (16K) 


This program turns a 16K, 
TRS-80 and lineprinter into a 
line oriented text-processing 
system. 


)1 THIS 1S THE MARVELOUS CREATIVE COMPUTING TEXT PROCESSOR 
ye IT CAM DO MARTY MORBERFUL THINGS? BUT IT CARNOT RUM YOUR 
¥3 ELECTRIC BLARET. IT 1S AMRZING HOM WWAIY PEOPLE Watt 
4 A TEXT PROCESSOR TO TURM OM THE COFFE POT AND RUM THE 


95 ELECTRIC BLAAKET. BUT 1 AQ MOT A CRAY ONE CHD CON ORLY 
6 DO MUNDANE THINGS LIKE CHE OM CARPETING AD EAT SHALL 
7 BOS. 


Developed exclusively for the 
TRS-80, this program lets you 
use the computer to enter 
general text or business letters, 
edit and modify your work, save 
text on cassette tapes, and print 
Out a perfect report, document, 
or letter every time. 


CONTINUE LIST ON SCREEN 
DELETE LINE 

EDIT : 

INSERT LINE 

RESUME FEYING ° 


LIST ON SCREEN . 
PRINT HARD COPY 
QUIT PROGRAM 
SAVE ON TAPE 


COMA? 


—@ © Or Fm Mm ey oF 


Editing commands are similar 
to those used in Level Il BASIC, 
so there arenocomplicated new 
commands to learn. Lines may 
be either inserted or deleted. A 
special format is available to 
speed entry of business letters. 
Final printout can. be done in 
numbered pages and you may 
print multiple copies. 
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'! Phd Software 


| P.O. Box 1007, Brunswick, Victoria. 


1 Please forward me the following Sensational 


this re-creation of the Battle of the graphics, lasers, Nilon space mines, high | { Software. 

Atlantic. energy photon torpedoes, enemy ships that | 4 Casenuy ree Price 
move, and an experimental ray which does t CS 3002 $14.95+50c p&p 
¢ Kaleidoscope something different each time you use it. | | C$ 3004 $14.95 +50c p&p 
You must act quickly to save yourself and CS 3005 $14.95 +50c p&p 
: ‘ the Federation. CS 3302 $14.95 +50c p&p 
male eating Sheeceannien ee | cS 4004 $1495 + 50c na 
g Se y : : p e Star Lanes CS 5001 $14.95 + 50c p&p 
age Kaleidoscope. You enter the num- Imagine yourself the president of an | | CS 6001 $14.95 +50c p&p 

i 


ber of lines and size of the display to 
produce changing patterns on the video 
monitor. Truly hypnotizing, Kaleido- 
Scope runs continuously to brighten up 
your home or office. 


intergalactic shipping company. If you're 
successful, you may be named Imperial 
Advisor on Economic Affairs. Entrepre- 
neurs: to your ships. 


e Star Wars 


, | enclose cheque for $ 


— em am aw «we come ae =e aw ae ow ow ae ae ae ae ow ae SD 


If you hate Darth Vader, you'll love Star 
Wars. This real time game is fun for aliens of 
all ages. May the Force be with you! 


e Romulan 


Your mission is to destroy an invading 
Romulan space craft. Maneuver through 
space and around stars looking for the 
deadly enemy, but be careful! The nasty 
Romulans fire back. 


WRITE FOR... 


' 
; ' 
We warrant to the user of Sensational Software | 
j that it is free from defective materials and | 
| 

| 

i 


FREF 


SOFTWARE CATALOG 


jworkmanship. If the product proves faulty, 
pit will be replaced if returned to the address 
‘above. 
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PROGRAMS. 


String Manipulation Routines of the 
type described below are generally not 
provided in high level languages. It is 
very common in user oriented programs 
such as in CAI or gaming programs that 
user input be matched to some expected 
reply. If the reply is of an alphanumeric 
form the blanks in the input string are 
often not significant and must be re- 
moved before comparing the two strings. 
Similarly, lower case input ‘yes’ would 
not match the string ‘YES’ and thus the 
need to convert from lower case to 
upper case before the comparison is 
made. 

The routines below provide for: 
1. Remove all blanks from an argument 


String Function 
by J. Di Stefano 


Remove leading blanks from an 
argument string. . 

. Remove trailing blanks 
argument string. 


2 

3 from 
4. Reduce multiple adjacent blanks to a 
5 

6 


an 


single blank. 

Convert lower case to upper case. 

Remove carriage return, line feed, 

tab, and escape characters. 

Before jumping to the subroutine two 
variables must be set up. 

1. The Argument String (ARG$ ) 

2. The Function Code (ARG) 

The Function Code (ARG) may take 
any value less than 64 and greater than 
zero (0 ARG 64). For example, a 
Function Code of 4 (ARG @ 4) will 


ARG$. But a Function Code of 6 (2&4) 
will remove both leading and trailing 
blanks. A Function Code of 22 (2&4 &16 ) 
will remove leading and trailing blanks 
and convert any lower case text to 
upper case. The subroutine returns the 
new string ARG$ appropriately mod- 
ified. 

In the program below the subroutine 
is called at line 320 GOSUB 20010. The 
return string and its length is output by 
line 330. The sample run tests the 
various string functions possible. The 
code presented should run without 
modification on most Microsoft type 
systems. 


string. remove trailing blanks from the string 


80 REM 
82 REM 
84 REM 
86 REM 
REM 
REM 
T$="THIS IS THE 
INFUT"ARGUMENT "3ARG 
ARG$=TS 
GOSUR 20010 
PRINT'ARG ="s3ARG3" 
GOTO 305 
REM OOOO OOOO ORO OOOO ICI AK I x 
FOG OK 
OOOO OOOO OOOO COOKIE I aoF 
FOO OSG OOK IOC 
OOOO OOOO ORCI IGOR OK FOR aOE IG 
FOI ISCO ICO ISK FICK aK 
SUBROUTINE MUST BE 
SUBROUTINE RETURNS 
ARGS ~ ARGUMENT STRING 
REM LARG - LENGTH OF ARGUMENT 
REM ARG -FUNCTION COUE (MUST BES ty 2r4e8e16932 
Uk ANY SUM OF THESE) 
REM 
REM 


IF TLARG# 
NEXT G 
ARG#=TARGS 
RE TURN 

REM 


20220 - BLANK THER 
20230 
20240 
20250 
20398 
20399 REM REMOVE LEADING BLANKS 
20400 FOR G=1 TO LARG 
20410 IF MIDSCARG$sGe1) <> BLANKS | 
THEN ARGH RIGHTS (ARG$ es) $ SE TURN 

NEXT 6G 

ARGS$=CHRE CO) 

RETURN 
REM 
REM REMOVE 


STRING. RAS 


TEST FROGRAM 


TEST. string*+ (CARS CP3) + CRG CLO RR" 


20420 
20430 
20450 
20598 


LOU? 


"SARGE sl EN CARGS >) 


oe et eee 


TRATLING BLANKS 


REM 
20600 FOR GelLARG TO 1. 
20610 ab 


Oe fre peal 
MIDS CAR GH y Gedo os BLANK 
RETR 
NEXT G 
ARGS=CHRE CO) 
RETURN 
REM 
REM RETIUCE ANY 
BLANK 
FOR G=1 TO LARG 
TIARGS$=MIDS (ARGH se Gel) 
IF TIARGS => BLANKS THEN BFL AG=O ¢ 
= TARUE+ TIARG&S GOTO SORE 
IF TIARG$ = BLANKS AND BFLAG=3 THEN BFL AGs1 2 
TARGA: TARGEST LARGE 
NEXT G 
ARGS=TARGS 
RETURN 
REM 
REM REDUCE LOWER CASE 
FOR G=1 TO LARG 
TIARGS$=MITG (ARGH eGo 1) 
TH=ASCIICTLIARGS) 
IF T = 96 AND T1423 THEN 
TARG$=TARGS$+T1 ARGS 
NEXT G 
ARG$=TARGS$ 
RETURN 
REM 
REM 


REM 


THERM ARG Abs Lei Fab 


Abela By Gi 


REM CALLED WITH 


ARG E 


ARG 98 ARGS 20620 
20630 
20650 
20798 
20799 


REM 


ANJACENT MULTIFLE BLANKS TU A STNGLE 
eS VES rs 20800 
FUNCT TON 20810 
seen Pe | | 20820 
1 REMOVE ALL BLANKS 

5 REMOVE LE ATING BLANKS 

4 REMOVE TRATLOING BLANKS 

8 REDUCE ANY MULTIPLE AnJAaACENT 
A SINGLE BLANK 

16 REDUCE LOWER CASE 
32 REMOVE CRy LFe 
IF ARG +63 THEN ARG=643 
20012 HIV = 32 

20015 IF ARG «= DIV THEN TIVen Tyee ° 
20017 ARG=ARG-DIY ¢ TARG=0TY 3 GOSUEB 
20020 IF ARG = O THEN 20015 

20030 RE TURN 

20050 BFLAG=0 

20060 LARG=LENCARGS) 

20065 TARGS$=*" 

20070 TIARGS="" 

20080 
20100 TF 
20102 LF 
20104 LF = 
20106 IF TARG = 8 
20108 IF TARG = 146° THEN 
20110 IF TARG = 32 THEN 21200 
20199 REM REMOVE ALL BLANKS 
20200 FOR G=1 TO LARG 

20210 TIARGS$=MINSC ARGH elie 1) 


20830 


BLANKS TO 20850 
20860 
20870 
20998 
20999 
21000 
21010 
21020 
21030 
21040 
21050 
21060 
21070 
21098 
21099 


TO OUPFER 
TARy ESC 


CASE 


20010 TO URFFER CASE 
GOTO 


erates 
2OO8a 


BOOUAS 


TIARG# Ch th OT 32) 


5 REMOVE CR LF TAB ESC (CALLCHARS ASCTL VALSES3 
TARG = 1. 


TARG = 2 


THEN 
THEN 
THEN 
THEN 


POA 
LOAOdO 
20500 
LOBOGO 
21004 


21200 
21210 
21220 
21230 
21240 
21250 
32767 


FOR Geil TO LARG 
TIARGS$=MIDNS (ARGH Ged) 
IF ASCIICTIARG#) = 4 
NEXT G 

ARG#=TARGS 

RETURN 

ENT 


Several Sorts 


by S. Zadarnowski 


Five different methods. of sorting are incorporated (and clearly labelled) in the listing. Use it as it stands or as a 
library of sorting routines for your own programs. 


THEN TARGé$=TARGS+T1LARGE 


oi 


2 heh PRESENTED - BY :S., 
ier 

i@ REMN--# FIVE METHODS OF SORTING # 
ef FEM 

38 IHFUT" 


PADARHOWSEI + 192 FEM ge : Sis oar 
2A REM--* METHOD TWO..DIMIHISHING LOOP. 

WERSIOM 14+ 

REM 

20 FOR M=1 TO H 


i 
SELECT METHOD # E 
@ FOR L=i TO H-MH 
S 
G 


Se hoes 42 Sa 


49 GOSUE ae 35 

SQ 0N S GOSUE 160,208. 200.400, 586 ef IF Aelasnel+is THEM ee 

64 GOTO Fea 256 T=ACL3: ACLISACLH13 ACLEL 3ST 
aq PRET 266 HEST L: HEXT 

16@ REM--* METHOD OME... FARTHER SORT # eft RETURH 


RET = 
2=f 3 
134 FOR M=t Ta H-1 

IF ACMo<=ACM+13 THEM Z=2+1 
T=ACMs SACMISACM+1 3 ACM+1 2=T 


@ REM 

Mf REM--* METHOD THREE..DININISHIHG LOOF. 
VERSION 2 # 

Lee 318 REM 


Pon tome} ieee ”, 
sei J=2 


> GOT 


166 IF 2=H-1 THEN FETURH 338 FOR M=1 TO H-1 
tfe HEaT M ¢GOTO 12h 344 FOR L=J TO W 


PROGRAMS 


IF ACM3>A6L> THEN T=ACL>:ACLOSACMD ACMO=T [@} 1 @) ses IF AcLo>ACL-1> OF L= 1 S86 
NEXT L:J=J+1: NEXT M 57a Pots @msack- Ly Abie 
eo aay ora L=L-1: GOTO 5és 

x s cee : sé > ; } 4 

REM--# METHOD FOUR. . REDUCING Sa ae Ho RETURH 


INTERVAL SORT # 
FEM 

M=H 

M=INT CMe? 
R=H-f: J= 


i 
IF M=8 THEN RETURH 


I=] 
L=I+M 


IF ACI2<=ACL> THEN 475 
T=ACI> SACII=ACL3 SACLI=T 


T=I-M 

IF I2=1 THEN 458 
2 J=J+1 

IF JK THEN 436 

GOTO 445 

REM 


REM--*® METHOD FIVE..S0FT AS Y'OU GO * 


REM 


INPUT" HOW MANY ELEMENTS "3H 


DIM Atha 
FOR M=1 TO H 


FPRINT"ELEMEHT #"°5M; 


IHPUT ACh: L=M 


VICTORIA 


MICOM-80 

A Special Interest Group of 
Melbourne’s TRS-80 and 
System 80 Users Group can 
be contacted on 560-8132 
or write to the Group Chair- 
man, Len Saunders, at 9 
Currajong Avenue, Glen 
Waverley, 3150. The group 
meets on the third Saturday 
of each month at the 
Ausom Users Hall. 


Geelong Computer Club 
Interested people should 
write to The Geelong 
Computer Club, P.O. Box 6, 
Geelong, 3220. 


O.S.1./6502 Users Group 


For information concerning 
this newly formed group, 
pews contact Ian Eyles, 10 
orbes St., Essendon, 3040. 
Phone 875-3478 A.H. 


Peninsula Group 

This group meets at State 
College Frankston, on the 
second Tuesday of each 
month except during Jan- 
uary. Those interested may 
contact M.G. Thompson on 
112-2674. 


AUSOM 
Apple Users’ Society of 
Melbourne. Contact Mr. 


David Turk of Computer- 
land Melbourne. 


S.M.U.G. 

To find out more about this 
group of SORD M100 users, 
contact Mr. Robin Miller, 
60 Winmalee Drive, Glen 
Waverley, 3150. 


Compucolor Users’ Group 
Write to Mr. L. Ferguson of 


666 REM--* GET DATA TO SORT # 


624 IF S=5 THEN RETURH 
CYOOUR DATA. OR CROANDOM DATA" RF 
ELEMENTS .“>H 


625 INPUT" 
638 INPUT" HOW MANY 
635 DIM ACH 


644 IF F#="7" THEN 676 


626 FOR M=1 TO H 


B30 ACMO=THT RHO Go ele 


@ HEST MM: RETURH 
era For M=1 TO H 


685 
698 IHMFUT Ach 
B95 HEAT M: RETURH 
FRE REM 
Pla REMN--# FRIHT SORTED LIST # 
rel REM 
roe FOR M=1 TO H 
e468 PRIHTM "2." ACM, 
ro HET M 
ro EMD 
READY. 


@®eeeee?ee?ee?eeee2ee@e 
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USER GROUPS INDEX 


12 Morphett Avenue, Ascot 
Vale for all the information 
necessary. 


S.C.U.A. 

Sorcerer Computer Users 
(Australia). Further details 
may be obtained from the 
Secretary, S.C.U.A., P.O. 
Box 144, Doncaster, 3108. 


Commodore Computer 
Users Association 

Nicki Saunders on 614-1433 
during business hours, has 
all the information. 


National Sinclair ZX80 
Users Club 


Tips and _ discussions of 
ZX80, sample _ programs, 
programming tips, discuss- 
ions and news of develop- 
ments in the U.K. and U.S., 
and a market place for 
goods and facilities spec- 
ially provided for’ the 
ZX80. Write for free intro- 
ductory newsletter: 24 Peel 
Street, Collingwood, 3066. 


NEW SOUTH WALES 


Australasia ZX80 Users’ 
roup 
This recently formed group 
aims to promote the use and 
growth of the Sinclair Z X80. 
A newsletter with listings of 
original programs submitted 
by members and friends, 
handy subroutines and other 
programming aides, as well 
as reviews on_ purchased 
software — hardware will be 
produced. 
Anyone interested in the 
ZX80 may contact Tony 
Mowbray, 87 Murphys Ave., 
Keiraville, 2500. Phone 
(042 )28-5296. 


Commodore User Group 
For more details, drop a line 


to Mr. John Guidice, C/- 
The Commodore _ Users 
Group, G.P.O. Box 4721, 
Sydney, 2001. 


Compucolor Users’ Group 

If you’ are _ interested, 
Andrew MacIntosh of 91 
Regent Street, Chippendale, 
is the man to see. 


SOAT 

Mail enquiries to 80 AT, C/- 
Planet 3 Systems, 47 Birch 
St., Bankstown, 2200. 


New South Wales Apple 
Users’ Group 

For more information write 
to J. Smith, 4/15 Raine St., 
Wollahra, 2025. 


QUEENSLAND 


Brisbane Youth Computer 
Group 

Mr. A. Harrison, P.O. Box 
396, Sunnybank, 4109, 
should be contacted for 
more information. 


IREE Microcomputer 
Interest Group 

No meetings will be held in 
January. Details on club 
membership etc. may be 
obtained from The _ Sec- 
retary, N. Wilson, P.O. Box 
81, Albion, 4010. Phone 
3566176. 


Ohio Superboard User 
Group 

For membership and news- 
letter information, please 
send a large S.A.E. to Ed 
Richardson, 146 York St., 
Nundah, 4012. 


SOUTH AUSTRALIA 
TRS-80 Users’ Group 


To obtain details contact 
Mr. G. Stevenson of 3:6 


FRIMT "ELEMENT #"°.M; 


Sturt Street, Adelaide, 5000 


Commodore Computer 
Users’ Association of S.A. 
This group meets at 7.30 
p.m. on the first Tuesday 
of each month at the 
Adelaide University Union 
Building. Further inform- 
ation is available from Earle 
Rowan, Commodore Com- 
puter Users’ Association of 
S.A., P.O. Box 60, Clarence 
Gardens, 5039. 


A.C.T. 
MICSIG 


Further information § con- 
cerning MICSIG, from the 
Registrar, MICSIG, C/- P.O. 
Box 446, Canberra City, 
vhs 


TASMANIA 
TEMOS 


All enquiries are welcome 
and may be directed to John 
Stephenson, President, 4 
Melinga Place, Taroona, 
7000. Ph: 27-8770. 


WESTERN AUSTRALIA 
Apple Users Club of W.A. 


The acting secretary/treas- 
urer, Tim Russell may be 
contacted C/- P.O. Box 38, 
Willetton 6155 or 332-1726 
A.H. 


NEW ZEALAND 


Wellington Microcomputer 
Society Inc. 

Write to Lindsay Williams, 
2 Pope Street, Plimmerton, 
New Zealand. 
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MS Microsoftware proudly announce the Australian release of a true 
historical wargame for your home computer -- COMPUTER 


WE MAKE 


THE BISMARCK BISMARCK.'™ It accurately simulates the epic battle between the 
awesome German battleship and the British Home Fleet . . . with 


60 APC 


you at the helm! 


Available on cassette for TRS-80 16 and 32K Level !| and on disc for 
ON YOUR Apple || 48K (Applesoft ROM). Both versions feature: 


@ Computer-controlled mapboard of the North Atlantic. 
“? e Step by step computer-regulated play. 
TRS-80 b 4 @ Hidden movement. 
® Ship vs. ship combat and shadowing. 
® Historical setup of battleships, cruisers, and carriers. 


e Firepower and damage. 
e Two-player and solitaire scenarios. 


The Apple Disc Version also features: 

© Submarines, destroyers, and convoys. 
e Land-based aircraft. 

® Weather and fog. 

® Fuel restrictions and refueling at sea. 


TRS-80 Cassette Version: $59.95 Apple Disc Version: $69.95 
To order today, send cheque or Postal Order to: 


P.O. Box 119, Essendon, Victoria 3040. 


MS Microsoftware, Beryl Street, West Essendon, Victoria 


Please send a SAE, for further details of COMPUTER BISMARCK'TM or the 
soon to be available, COMPUTER AMBUSH'M. 


s 
Te | COMPUTER 
‘ : : ‘| BISMARCK" 
Pf cnr Bn, tee There’s never 
ey. x By * Trade Mark of Tandy Corp. been anything 
OR YOUR APPLE. bia wtanes 


if we are unable to process your order within fourteen days, your cheque or postal order will be returned. 
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The Paper Tiger IDS440 Impact Printer 


Puts more bite into everything you do. 


Now available — the Paper Tiger Printer features a graphics option that lets you make the most of your 
Apple II or other personal computer. And, the Paper Tiger gives you 8 software-selectable character sizes, 
80 and 132 column formats, Multi-Part business forms handling, adjustable tractor feed, form control, 
reliable stepper motor paper drive, serial and parallel interfacing... plus lots more. 


Don't let our low prices fool you! 


The Paper Tiger is rugged enough to stand up to the most demanding printer/plotter requirements. 


We also stock: 
TEXAS INSTRUMENTS: High speed, high reliability, professional dot matrix, 132 character/line printers. 
N.E.C.: Highest standard in professional character printers, for word processing and similar applications. 


-- AUSTRALIA‘S LEADERS IN SMALL COMPUTER SYSTEMS — 


write now or call us: 


Computerland 
in Melbourne 


Grd. Floor, 555 Collins Street, MELBOURNE. VIC. 3000. pincers eae 
Phone (03) 62 6737 (03) 625581 Telex AA37007. 


St. 


Collins jm St. 


Spencer 


The Challenger 4 


Whichever way you look at if, no other computer 
offers so much for so little,and in colour! 


Minifloppy - two can be 
added. 


Full53 key, keyboard which in 
polled mode can recognise 
up to 8 simultaneously ae 


depressed keys. & aA aa RF shielded aluminium case 


with 2 step baked on enamel 
finish. 


Inside: real time clock and 
countdown timer 24K 
memory 6502A processor 


Solid oiled walnut sides. 


Control line interfaces, Joystick sockets - add Colour adjustment. | Video Display 64 x 32 Sound outputs, 
parallel lines for home realism to games. programmable tone 
security, accessory BUS, , generators - 8 bit 
parallel l/0 lines or other companding digital to 


TTL signals. analog convertors. 
RF output for control of 
AC appliances. 
Printer RS232 interface Numeric key pad slots. Cassette sockets. 
You'd have to go a long way to A real time clock and count Special offer with this 

get better value in a computer. It down timer, a 64 x 32display in 16 advertisement only — bring it 

has execution speed that really colours, including 8K memory inthe along with you when you visit your 

separates the computers from the cassette version, 24K for the dealer and obtain $20 discount off 


toys. We think the Challenger 4 is minifloppy. A BUS structure allows your CHALLENGER 4 purchase. 

way ahead of anything youve seen _ easy plug in of extra memory or 

So far, for a wide variety of uses many more OHIO boards. The BUS 

including business, personal, means modularity. If you bought 

educational and games, as well as your vintage C2-4 in 1977 we can 

a real-time operating system, word change the boards at a much lower 

processor and a data base cost than a new computer. 

management system. For the best surprise of all ask 
The Challenger 4 has a 2MHz our opposition if they can provide 

6502 processor, and if that’s not fast _ all these facilities. When they cant, 


enough wecansupplytheGToption ask us! . - 
with the 6502C processor, and 120 TOMORROWS TECHNOLOGY TODAY 2 
nanosecond memory which Q 
mein OHIO SCIENTIFIC: 
instructions per second. : 
»"G 
O 
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Unique Electronics 


NEW SOUTH WALES MERRYLANDS 682 3325 TASMANIA Micro Data EAST PERTH 328 
Bambach Elect. NEWCASTLE 24996 Eastside Computers Micro Solutions SUBIACO 381 
Comouserve Newcastle Pty. Ltd. AUSTRALIAN CAPITAL TERRITORY EAST DEVENPORT 27 8121 


HAMILTON 61 2579 MES CANBERRA 82 1774 J. Walsh & Co. HOBART 34 7511 


